home *** CD-ROM | disk | FTP | other *** search
/ MacHome 2001 May / MacHome CD (May 2001).iso / mac / Stuff / Software / Home / GEDitCOM 2.9.3 / Formats / Default GEDitCOM Format < prev    next >
Encoding:
Text File  |  2000-12-05  |  99.7 KB  |  5,565 lines  |  [TEXT/GeDt]

  1. GFVN 6
  2. @@GeDF@@_Unknown_ Printing
  3. ! static text with level and tab
  4. newline
  5. get *name
  6. if
  7.   style static
  8.   text *lev
  9.   text " "
  10.   text *tag
  11. else
  12.   style label
  13.   text *it
  14. endif
  15. text :
  16. get #rtjs
  17. if 1
  18.   justify right
  19. endif
  20. tabwidth 2
  21.  
  22. ! edit field with value
  23. hskip 5
  24. style editvalue w=-1
  25. newline
  26. @@GeDF@@Individual Events
  27. ADOP Adoption
  28. CHRA Adult Christening
  29. BAPM Baptism
  30. BARM Bar Mitzvah
  31. BASM Bas Mitzvah
  32. BIRT Birth
  33. BLES Blessing
  34. BURI Burial
  35. CAST Caste Name
  36. CENS Census
  37. CHR Christening
  38. EVEN Circumcision
  39. CREM Cremation
  40. CONF Confirmation
  41. NMR Count of Marriages
  42. DEAT Death
  43. EVEN Deed
  44. EDUC Education
  45. EMIG Emigration
  46. FCOM First Communion
  47. EVEN Generic Event
  48. GRAD Graduation
  49. EVEN Illness
  50. IMMI Immigration
  51. BAPL LDS Baptism
  52. SLGC LDS Child Sealing
  53. CONL LDS Confirmation
  54. ENDL LDS Endowment
  55. EVEN Military Service
  56. EVEN Miscarriage
  57. EVEN Mission
  58. NAME Name
  59. IDNO National ID Number
  60. NATI National or Tribal Origin
  61. NATU Naturalization
  62. TITL Nobility Type Title
  63. NCHI Number of Children
  64. OCCU Occupation
  65. ORDN Ordination
  66. DSCR Physical Description
  67. PROP Possessions
  68. PROB Probate
  69. RELI Religious Affiliation
  70. RETI Retirement
  71. RESI Residence
  72. SSN Social Security Number
  73. WILL Will
  74. @@GeDF@@Family Events
  75. ANUL Annulment
  76. CENS Census
  77. DIV Divorce
  78. DIVF Divorce Filed
  79. EVEN Generic Event
  80. ENGA Engagement
  81. SLGS LDS Spouse Sealing
  82. MARR Marriage
  83. MARB Marriage Bann
  84. MARC Marriage Contract
  85. MARL Marriage License
  86. MARS Marriage Settlement
  87. NCHI Number of Children
  88. EVEN Separation
  89. @@GeDF@@GEDCOM Tag Names
  90. ABBR Short Title
  91. ADOP Adoption
  92. ADR1 Address Line 1
  93. ADR2 Address Line 2
  94. AGE Age
  95. AGNC Agency
  96. ANCE Gens. of Ancestors
  97. ANUL Annulment
  98. AFN Ancest. File No.
  99. BAPL LDS Baptism
  100. BAPM Baptism
  101. BARM Bar Mitzvah
  102. BASM Bas Mitzvah
  103. BIRT Birth
  104. BLES Blessing
  105. BURI Burial
  106. CALN Call Number
  107. CAST Caste Name
  108. CAUS Cause
  109. CENS Census
  110. CHAR Character Set
  111. CHR Christ'ing
  112. CHRA Adult Chr
  113. CITY City
  114. CONF Confirmation
  115. CONC Concatenated
  116. CONL LDS Confirmation
  117. CONT Continued
  118. COPR Copyright
  119. CORP Corporation
  120. CREM Cremation
  121. CTRY Country
  122. DATE Date
  123. DEAT Death
  124. DESC Gens. of Descendents
  125. DEST Dest File
  126. DIV Divorce
  127. DIVF Divorce Filed
  128. DSCR Physical Descrip.
  129. EMIG Emigration
  130. ENGA Engaged
  131. ENDL LDS Endowment
  132. EVEN Event
  133. EDUC Education
  134. FAMF Family File
  135. FCOM First Communion
  136. FILE File
  137. FORM Form
  138. GIVN Given
  139. GRAD Graduation
  140. IDNO Nat. ID No.
  141. IMMI Immigrat'n
  142. LANG Language
  143. MARB Marriage Banns
  144. MARC Marriage Contract
  145. MARL Marriage License
  146. MARR Marriage
  147. MARS Settlement
  148. MEDI Media Type
  149. NATI Nationality
  150. NATU Nat'rlized
  151. NCHI No. of Children
  152. NICK Nickname
  153. NMR No. of Marriages
  154. NPFX Prefix
  155. NSFX Suffix
  156. OCCU Occupation
  157. ORDI Ord. Process Flag
  158. ORDN Ordination
  159. PAGE Page
  160. PEDI Pedigree
  161. PHON Phone No.
  162. PLAC Place
  163. POST Postal Code
  164. PROB Probate
  165. PROP Possessions
  166. QUAY Quality
  167. REFN User Ref. No.
  168. RELA Relationship
  169. RELI Religion
  170. RESI Residence
  171. RESN Restriction
  172. RETI Retirement
  173. RFN Record File No.
  174. RIN Record ID
  175. ROLE Role in Event
  176. SLGC LDS Child Sealing
  177. SLGS LDS Spouse Sealing
  178. SPFX Sur Prefix
  179. SSN Soc. Sec. No.
  180. STAE State
  181. STAT Status
  182. SURN Surname
  183. TEMP Temple
  184. TEXT Text
  185. TITL Title
  186. TIME Time
  187. TYPE Type
  188. VERS Version
  189. WILL Will
  190. _MREL Mother's Rel.
  191. _FREL Father's Rel.
  192. @@GeDF@@@WindowRects
  193. 1 2 0 0
  194. 23 51 528 508
  195. 50 111 560 562
  196. 138 187 558 452
  197. 90 69 521 537
  198. 33 107 443 470
  199. 63 183 512 352
  200. 14 171 411 380
  201. 67 206 448 434
  202. 60 141 570 592
  203. 57 158 550 303
  204. 109 53 623 575
  205. 10 46 633 690
  206. 21 55 637 474
  207. 85 47 546 524
  208. 72 116 581 572
  209. 33 107 514 531
  210. 170 90 605 474
  211. 33 107 514 531
  212. @@GeDF@@@Tree Preferences
  213. 0 @PREF@ @TRE
  214. 1 @VRS 6
  215. 1 @STY Name
  216. 2 @FNT Helvetica
  217. 2 @SZE 9
  218. 2 @FCE Plain
  219. 2 @CLR Color
  220. 3 @RGB 0 0 0
  221. 1 @STY Title
  222. 2 @FNT Helvetica
  223. 2 @SZE 10
  224. 2 @FCE Bold
  225. 2 @CLR Color
  226. 3 @RGB 0 0 0
  227. 1 @CLR Males
  228. 2 @RGB 3276 48495 63568
  229. 1 @CLR Females
  230. 2 @RGB 63568 41942 59636
  231. 1 @CLR Cross Reference
  232. 2 @RGB 49972 4968 8539
  233. 1 @CLR Box Frame
  234. 2 @RGB 18349 18349 18349
  235. 1 @CLR Box Shadow
  236. 2 @RGB 52428 65535 52428
  237. 1 @CLR Lines
  238. 2 @RGB 0 0 0
  239. 1 @CKB Use Color
  240. 2 @CVL Y
  241. 1 @TXT Box Style
  242. 2 @TVL Simple Box
  243. 1 @TXT Name Format
  244. 2 @TVL Full Names
  245. 1 @TXT Life Span
  246. 2 @TVL On Second Line
  247. 1 @TXT Ancestor Format
  248. 2 @TVL Horizontal, Center Aligned
  249. 2 @CKB Reverse (R->L or B->T)
  250. 3 @CVL N
  251. 1 @TXT Descendant Format
  252. 2 @TVL Horizontal, Center Aligned
  253. 2 @CKB Reverse (R->L or B->T)
  254. 3 @CVL N
  255. 1 @NUM Horiz Spacing
  256. 2 @VAL 12
  257. 1 @NUM Vert Spacing
  258. 2 @VAL 10
  259. 1 @NUM Horiz Padding
  260. 2 @VAL 3
  261. 1 @NUM Vert Padding
  262. 2 @VAL 3
  263. 1 @NUM Top Margin
  264. 2 @VAL 5
  265. 1 @NUM Left Margin
  266. 2 @VAL 5
  267. 1 @NUM Max Appearances
  268. 2 @VAL 1
  269. 1 @NUM Line Thickness
  270. 2 @VAL 2
  271. @@GeDF@@@Index Preferences
  272. 0 @PREF@ @IDX
  273. 1 @VRS 6
  274. 1 @STY Index
  275. 2 @FNT Times
  276. 2 @SZE 12
  277. 2 @FCE Plain
  278. 2 @CLR Color
  279. 3 @RGB 0 0 0
  280. 1 @CLR Odd Rows
  281. 2 @RGB 58638 58638 58638
  282. 1 @CLR Even Rows
  283. 2 @RGB 58638 58638 58638
  284. 1 @HGL
  285. 2 @CLR Grid Color
  286. 3 @RGB 63488 63488 63488
  287. 2 @CKB Use Grid Lines
  288. 3 @CVL Y
  289. 1 @NUM Row Padding
  290. 2 @VAL 2
  291. 1 @CKB Require Double Clicks
  292. 2 @CVL N
  293. 1 @IPU Clicking Opens
  294. 2 @IPV Y
  295. 1 @IPU Shift-Clicking Opens
  296. 2 @IPV N
  297. 1 @ICL Y
  298. 2 @ILB NAME
  299. 2 @IJT Left
  300. 2 @ITY 0
  301. 1 @ICL Y
  302. 2 @ILB BIRTH
  303. 2 @IJT Center
  304. 2 @ITY 1
  305. 1 @ICL Y
  306. 2 @ILB DEATH
  307. 2 @IJT Center
  308. 2 @ITY 2
  309. 1 @ICL Y
  310. 2 @ILB FATHER
  311. 2 @IEX FAMC.HUSB.NAME
  312. 2 @IJT Left
  313. 1 @ICL Y
  314. 2 @ILB MOTHER
  315. 2 @IEX FAMC.WIFE.NAME
  316. 2 @IJT Left
  317. @@GeDF@@_Unknown_ Editing
  318. ! static text with level and tab
  319. newline
  320. get *name
  321. if
  322.   style static tw=2 j=right
  323.   text *lev
  324.   text " "
  325.   text *tag
  326.   text " "
  327. else
  328.   style label tw=2 j=right
  329.   text *it
  330.   text :
  331. endif
  332.  
  333. ! edit field with value
  334. hskip 5
  335. style editvalue b=1pfield w=-1
  336. newline
  337. @@GeDF@@@Editing Preferences
  338. 0 @PREF@ @EDT
  339. 1 @STY Editing
  340. 2 @FNT Times
  341. 2 @SZE 12
  342. 2 @FCE Plain
  343. 2 @CLR Color
  344. 3 @RGB 0 0 0
  345. 1 @STY Labels
  346. 2 @FNT Times
  347. 2 @SZE 12
  348. 2 @FCE Bold
  349. 2 @CLR Color
  350. 3 @RGB 0 0 0
  351. 1 @STY Static
  352. 2 @FNT Times
  353. 2 @SZE 12
  354. 2 @FCE Italic
  355. 2 @CLR Color
  356. 3 @RGB 0 0 0
  357. 1 @STY Buttons
  358. 2 @FNT Geneva
  359. 2 @SZE 9
  360. 2 @FCE Plain
  361. 2 @CLR Color
  362. 3 @RGB 0 0 0
  363. 1 @CLR Revision
  364. 2 @RGB 65000 0 0
  365. 1 @CLR Background
  366. 2 @RGB 65535 57015 53083
  367. 1 @CLR Field Top
  368. 2 @RGB 30146 15073 10485
  369. 1 @CLR Field Bottom
  370. 2 @RGB 65535 64224 62918
  371. 1 @CLR Button
  372. 2 @RGB 58940 59022 59022
  373. 1 @CLR Button Top
  374. 2 @RGB 62258 62258 62258
  375. 1 @CLR Button Bottom
  376. 2 @RGB 42597 42597 42597
  377. 1 @NUM Line Separation
  378. 2 @VAL 3
  379. 1 @NUM Left Margin
  380. 2 @VAL 4
  381. 1 @NUM Min Edit Lines
  382. 2 @VAL 5
  383. 1 @NUM Max Edit Lines
  384. 2 @VAL 10
  385. 1 @NUM Button Corners
  386. 2 @VAL 8
  387. 1 @VRS 6
  388. @@GeDF@@Custom Long Tags
  389. _FREL
  390. _MREL
  391. _SCHEMA
  392. _MEND
  393. _MSTAT
  394. @@GeDF@@GEDCOM Tag Phrases
  395. NOTE Notes on
  396. DEAT Has Died
  397. MARR Married
  398. @@GeDF@@@ColumnWidths
  399. 175
  400. 70
  401. 70
  402. 140
  403. 140
  404. @@GeDF@@INDI Record Editing
  405. settab 60
  406. settab 110
  407. settab 205
  408. set sbrk 1
  409. toolbg 65535 52428 46530
  410. MinWidth 325
  411.  
  412. pass ficn
  413.  
  414. hskip 8
  415. icon Father View:Father
  416. help View father
  417. hskip -1
  418. icon Mother View:Mother
  419. help View mother
  420. hskip -1
  421. icon Families View:Families
  422. help View families
  423. hskip -1
  424. icon Spouse View:Spouse
  425. help View spouses
  426. hskip -1
  427. icon Children View:Children
  428. help View children
  429. hskip -1
  430. icon Siblings View:Siblings
  431. help View siblings
  432. hskip -1
  433. icon Relatives View:Relatives...
  434. help Search for relatives
  435.  
  436. hskip 4
  437. icon Ancestors Tree:Ancestor Tree
  438. help Compile ancestor tree
  439. hskip -1
  440. icon Descendants Tree:Descendant Tree
  441. help Compile descendant tree
  442.  
  443. pass gmen
  444. endiconbar
  445.  
  446. set isiz #rmgn
  447. sub isiz #lmgn
  448. sub isiz 232
  449. set nbeg #vpos
  450. show NAME INDI
  451. newline
  452. set nend #vpos
  453. MoveTo #nbeg
  454. show SEX
  455. hskip 0
  456. show RESN here
  457.  
  458. hskip 5
  459. style button b=1pfield w=14 h=17
  460. menulink Tree:Mark Record
  461. help Click to mark or unmark
  462. get *mark
  463. if Y
  464.   picture @Mark
  465. endif
  466. newline
  467. MoveTo #nend
  468.  
  469. showall NAME INDI
  470. endtoolbar 2
  471.  
  472. ! --------- Birth Event(s)
  473. newline 1
  474. set strt #vpos
  475. show BIRT
  476. showall BIRT
  477. newline
  478. pass bbox Birth
  479.  
  480. ! --------- Death Event(s)
  481. newline #sbrk
  482. set strt #vpos
  483. show DEAT
  484. showall DEAT
  485. newline
  486. pass bbox Death
  487.  
  488. ! --------- Family links -----------
  489. ifhastags FAMS
  490.   newline #sbrk
  491.   set strt #vpos
  492.   showall FAMS
  493.   newline
  494.   pass bbox Spouses
  495.   newline
  496. endif
  497.  
  498.  
  499. ! --------- Parent links -----------
  500. ifhastags FAMC
  501.   newline #sbrk
  502.   set strt #vpos
  503.   showall FAMC
  504.   newline
  505.   pass bbox Parents
  506.   newline
  507.   set hasc 0
  508. else
  509.   set hasc 1
  510. endif
  511.  
  512. ! --------- New Family Buttons -----------
  513. get *this.SEX
  514. ifnotempty
  515.   newline #sbrk
  516.   set strt #vpos
  517.   tab 1
  518.   hskip 5
  519.   style button b=3dbutton j=center
  520.   if M
  521.     text "Attach as Husband in New Family"
  522.     menulink Attach:As Husband in New Family
  523.   else
  524.     text "Attach as Wife in New Family"
  525.     menulink Attach:As Wife in New Family
  526.   endif
  527.   width -12
  528.   get #hasc
  529.   if 1
  530.     hskip 5
  531.     style button b=3dbutton j=center
  532.     text "Attach as Child in New Family"
  533.     menulink Attach:As Child in New Family
  534.     width -12
  535.   endif
  536.   newline
  537.   pass bbox Create
  538. else
  539.   get hasc
  540.   if 1
  541.     newline #sbrk
  542.     set strt #vpos
  543.     tab 1
  544.     hskip 5
  545.     style button b=3dbutton j=center
  546.     text "Attach as Child in New Family"
  547.     menulink Attach:As Child in New Family
  548.     width -12
  549.     newline
  550.     pass bbox Create
  551.   endif
  552. endif
  553.  
  554. ! --------- Events -----------
  555. newline #sbrk
  556. set strt #vpos
  557. tab 1
  558. hskip 5
  559. cleartabs
  560. settab #hpos
  561. set ntab #hpos
  562. add ntab 100
  563. settab #ntab
  564. add ntab 16
  565. settab #ntab
  566. set ntab #rmgn
  567. sub ntab #lmgn
  568. sub ntab 22
  569. settab #ntab
  570.  
  571. lineskip 2
  572. set hder 0
  573.  
  574. showall BAPM
  575. showall CHR
  576. showall BLES
  577. showall BARM
  578. showall BASM
  579. showall ADOP
  580. showall CHRA
  581. showall CONF
  582. showall FCOM
  583. showall ORDN
  584. showall GRAD
  585. showall EMIG
  586. showall IMMI
  587. showall NATU
  588. showall CENS
  589. showall RETI
  590. showall PROB
  591. showall BURI
  592. showall WILL
  593. showall CREM
  594. showall EVEN
  595. showall BAPL
  596. showall CONL
  597. showall ENDL
  598. showall SLGC
  599.  
  600. lineskip #dlsk
  601. newline
  602. tab 1
  603. style button
  604. picture PlusIcon
  605. menulink Attach:Event/Attribute
  606. help Add event or attribute
  607.  
  608. hskip 5
  609. style button
  610. Picture MinusIcon
  611. menulink Detach:Event/Attribute/Link
  612. help Delete event or attribute
  613.  
  614. cleartabs
  615. settab 60
  616. newline
  617. pass bbox Events
  618. newline
  619.  
  620. ! --------- Attributes -----------
  621. newline #sbrk
  622. set strt #vpos
  623. tab 1
  624. hskip 5
  625. cleartabs
  626. settab #hpos
  627. set ntab #hpos
  628. add ntab 120
  629. settab #ntab
  630. set ntab #rmgn
  631. sub ntab #lmgn
  632. sub ntab 22
  633. settab #ntab
  634.  
  635. lineskip 2
  636. set hder 0
  637.  
  638. showall RESI
  639. showall OCCU
  640. showall EDUC
  641. showall DSCR
  642. showall RELI
  643. showall SSN
  644. showall IDNO
  645. showall PROP
  646. showall CAST
  647. showall NCHI
  648. showall NMR
  649. showall TITL
  650. showall NATI
  651.  
  652. lineskip #dlsk
  653. newline
  654. cleartabs
  655. settab 60
  656. settab 110
  657. settab 210
  658. get #hder
  659. if 1
  660.   pass bbox Att’butes
  661.   newline
  662. else
  663.   sub strt 1
  664.   MoveTo #strt
  665. endif
  666.  
  667. ! --------- NOTEs -----------
  668. ifhastags NOTE
  669.   newline #sbrk
  670.   tab 1
  671.   hskip 5
  672.   leftskip #hpos
  673.   set strt #vpos
  674.   showall NOTE
  675.   newline
  676.   pass bbox Notes
  677. endif
  678.  
  679. ! --------- Sources -----------
  680. ifhastags SOUR
  681.   newline #sbrk
  682.   tab 1
  683.   hskip 5
  684.   leftskip #hpos
  685.   set strt #vpos
  686.   showall SOUR
  687.   newline
  688.   pass bbox Sources
  689. endif
  690.  
  691. ! --------- Mutlimedia -----------
  692. ifhastags OBJE
  693.   newline #sbrk
  694.   tab 1
  695.   hskip 5
  696.   leftskip #hpos
  697.   set strt #vpos
  698.   showall OBJE
  699.   newline
  700.   pass bbox Media
  701. endif
  702.  
  703. ! --------- Aliases -----------
  704. ifhastags ALIA
  705.   newline #sbrk
  706.   tab 1
  707.   hskip 5
  708.   leftskip #hpos
  709.   set strt #vpos
  710.   showall ALIA
  711.   newline
  712.   pass bbox Aliases
  713. endif
  714.  
  715. ! --------- Associations -----------
  716. ifhastags ASSO
  717.   newline #sbrk
  718.   tab 1
  719.   hskip 5
  720.   leftskip #hpos
  721.   set strt #vpos
  722.   showall ASSO
  723.   newline
  724.   pass bbox Assoc'ns
  725. endif
  726.  
  727. ! --------- Attach Buttons ---------
  728. newline #sbrk
  729. tab 1
  730. hskip 5
  731. leftskip #hpos
  732. set strt #vpos
  733. show NOTE
  734. show SOUR
  735. show OBJE
  736. show ALIA
  737. show ASSO
  738. newline
  739. pass bbox Attach
  740.  
  741. ! --------- Submitter Links ---------
  742. leftSkip #dlmg
  743. newline #sbrk
  744. tab 1
  745. hskip 5
  746. leftskip #hpos
  747. set strt #vpos
  748. show SUBM
  749. showall SUBM
  750. show ANCI
  751. showall ANCI
  752. show DESI
  753. showall DESI
  754. newline
  755. pass bbox Links
  756.  
  757. ! --------- The rest -----------
  758. if more
  759.   newline #sbrk
  760.   set strt #vpos
  761.   style static
  762.   newline
  763.   pass bbox Other
  764.   newline
  765.   MoveTo #strt
  766. endif
  767. cleartabs
  768. settab 100
  769. settab 170
  770.  
  771. showall CHAN
  772. showall REFN
  773. @@GeDF@@NAME Editing
  774. ! start new line and label
  775. NewLine
  776. Style label j=right tw=1
  777. Text Name:
  778.  
  779. ! edit name
  780. HSkip 5
  781. Style editvalue b=1pfield
  782. get *msg
  783. if INDI
  784.   Width #isiz
  785.   HSkip 5
  786.  
  787.   Style button w=17 h=16
  788.   help Name details
  789.   if more
  790.     Picture DownIcon
  791.   else
  792.     Picture EmptyDownIcon
  793.   endif
  794.   GroupLink name
  795.     ShowAll All
  796.   EndGroup
  797.   hskip 0
  798.  
  799.   Set namh #hpos
  800. else
  801.   Width -1
  802. endif
  803. @@GeDF@@BIRT Editing
  804. Tab 1
  805. Show DATE *name
  806. Set detH #hpos
  807. Set detV #vpos
  808. Show PLAC
  809.  
  810. ! Rest in pop up window
  811. Set curV #vpos
  812. MoveTo #detV
  813. HMoveTo #detH
  814. HSkip 4
  815. Style button w=18
  816. help *name
  817. help " details"
  818. if more
  819.   Picture DownIcon
  820. else
  821.   Picture EmptyDownIcon
  822. endif
  823. GroupLink bdEX *name
  824. ShowAll All
  825. EndGroup
  826. MoveTo #curV
  827. @@GeDF@@DATE Editing
  828. ! label on current line
  829. get *msg
  830. ifempty
  831.   style label j=right tw=1
  832.   text Date:
  833.  
  834.   ! edit the date
  835.   hskip 5
  836.   style editvalue b=1pfield w=-1
  837.   content date
  838. elseif Birth
  839.   style label j=right tw=1
  840.   text Date:
  841.  
  842.   ! edit the date
  843.   hskip 5
  844.   set dwid #rmgn
  845.   sub dwid #hpos
  846.   sub dwid 21
  847.   sub dwid #lmgn
  848.   style editvalue b=1pfield w=#dwid
  849.   content date
  850. elseif Death
  851.   style label j=right tw=1
  852.   text Date:
  853.  
  854.   ! edit the date
  855.   hskip 5
  856.   set dwid #rmgn
  857.   sub dwid #hpos
  858.   sub dwid #lmgn
  859.   sub dwid 96
  860.   style editvalue b=1pfield w=#dwid
  861.   content date
  862. elseif Event
  863.   ! edit the date
  864.   hskip 7
  865.   style editvalue b=1pfield tw=1
  866.   content date
  867. endif
  868. help Enter valid date
  869. @@GeDF@@DEAT Editing
  870. Tab 1
  871. HSkip 0
  872. Set oldh #hpos
  873. HMoveTo #rmgn
  874. HSkip -95
  875. Style 1pcheckedit w=70 f=bold
  876. Text *phra
  877. get *name
  878. if Death
  879.   help Check if individual is deceased
  880. else
  881.   help Check if event happened
  882. endif 
  883. UncheckedValue
  884. HSkip 0
  885. Set detH #hpos
  886. Set detV #vpos
  887.  
  888. ! show date and place
  889. HMoveTo #oldh
  890. Show DATE Death
  891. Show PLAC
  892.  
  893. ! Rest in pop up window
  894. Set curV #vpos
  895. MoveTo #detV
  896. HMoveTo #detH
  897. HSkip 4
  898. Style button w=18
  899. help *name
  900. help " details"
  901. if more
  902.   Picture DownIcon
  903. else
  904.   Picture EmptyDownIcon
  905. endif
  906. GroupLink bdEX *name
  907. ShowAll All
  908. EndGroup
  909. MoveTo #curV
  910. @@GeDF@@SEX Editing
  911. HMoveTo #namh
  912. set hskp #rmgn
  913. sub hskp #lmgn
  914. sub hskp 47
  915. sub hskp #hpos
  916. get *this.FAMS
  917. ifempty
  918.   sub hskp 75
  919.   div hskp 2
  920.   hskip #hskp
  921.  
  922.   ! "Male" or "Female" pop up
  923.   style popupedit b=popbutton j=center s=9 w=75
  924.   font geneva
  925.   popupitem Male:M
  926.   popupitem Female:F
  927.   popupitem Unknown:
  928.  
  929. else
  930.   sub hskp 55
  931.   div hskp 2
  932.   hskip #hskp
  933.  
  934.   ! "Male" or "Female" static text
  935.   style button j=center b=3dbutton w=55
  936.   get *valu
  937.   if M
  938.     text Male
  939.   else
  940.     text Female
  941.   endif
  942.   menulink Attach:Changed Sex
  943.  
  944. endif
  945. help Click to change sex
  946. @@GeDF@@FAMS Editing
  947. ! marriage button
  948. newline
  949. tab 1
  950. hskip 10
  951. style button
  952. picture FamIcon
  953. help View family record with spouse
  954. link *valu
  955.  
  956. ! Spouse
  957. tab 1
  958. hskip 0
  959. style static j=right
  960. get *this.SEX
  961. if F
  962.   text Husband:
  963.   get *valu.HUSB
  964.   setstr snam Husband
  965. else
  966.   text Wife:
  967.   get *valu.WIFE
  968.   setstr snam Wife
  969. endif
  970. width -2
  971.  
  972. hskip 5
  973. style button s=12 w=-1
  974. font times
  975. if validlink
  976.   text *it.NAME
  977.   link *it
  978.   blue
  979.   face underline
  980.   help "View "
  981.   help *snam
  982. else
  983.   text <unknown>
  984. endif
  985. @@GeDF@@NOTE Editing
  986. if tagexists
  987.   get #lmgn
  988.   if #dlmg
  989.     NewLine
  990.     Style label tw=2 j=right
  991.     Text Notes:
  992.     HSkip 5
  993.   endif
  994.   Style button w=-1 f=underline s=12
  995.   Blue
  996.   Font times
  997.   get *valu
  998.   if validlink
  999.     Link *valu
  1000.     SetStr tfst *valu.next
  1001.     ifEmpty *tfst
  1002.       SetStr tfst <Notes with first line empty>
  1003.     else
  1004.       Count *valu.next
  1005.       ifNot 1
  1006.         CatStr tfst ...
  1007.       endif
  1008.     endif
  1009.   else
  1010.     SetStr tfst *valu
  1011.     ifEmpty *tfst
  1012.       SetStr tfst <Notes with first line empty>
  1013.     else
  1014.       Count *next
  1015.       ifnot 0
  1016.         CatStr tfst ...
  1017.       endif
  1018.     endif
  1019.     StructLink eNOT
  1020.   endif
  1021.   Text *tfst
  1022.   Help Click to view and edit notes
  1023. else
  1024.   Style button
  1025.   Picture NotesIcon
  1026.   Help Add notes
  1027.   get *msg
  1028.   if "Header"
  1029.     StructLink eNOT
  1030.   else
  1031.     NewLink
  1032.   endif
  1033. endif
  1034. HSkip 5
  1035. @@GeDF@@FAMC Editing
  1036. get *lev
  1037. if 1
  1038.   ! parent family button
  1039.   newline
  1040.   tab 1
  1041.   hskip 10
  1042.   style button
  1043.   picture FamIcon
  1044.   text Parents Family
  1045.   help View parent’s family record
  1046.   link *valu
  1047.  
  1048.   hskip 2
  1049.   show PEDI
  1050.  
  1051.   ! Father
  1052.   style static tw=1 j=right
  1053.   text Father:
  1054.  
  1055.   hskip 5
  1056.   style button s=12
  1057.   get *valu.HUSB
  1058.   font times
  1059.   if validlink
  1060.     text *it.NAME
  1061.     link *it
  1062.     blue
  1063.     face underline
  1064.     help View father
  1065.   else
  1066.     text <unknown>
  1067.   endif
  1068.   width -2
  1069.  
  1070.   newline -9
  1071.   tab 2
  1072.  
  1073.   ! Mother
  1074.   style static tw=1 j=right
  1075.   text Mother:
  1076.  
  1077.   hskip 5
  1078.   style button s=12 w=-1
  1079.   get *valu.WIFE
  1080.   font times
  1081.   if validlink
  1082.     text *it.NAME
  1083.     link *it
  1084.     blue
  1085.     face underline
  1086.     help View mother
  1087.   else
  1088.     text <unknown>
  1089.   endif
  1090.  
  1091. ! this section for FAMC in Adoption events
  1092. else
  1093.  
  1094.   ! parent family button
  1095.   newline
  1096.   hMoveto 20
  1097.   style button j=center w=90 b=3dbutton
  1098.   link *valu
  1099.   if more
  1100.     text Adoptive Family
  1101.     show ADOP inAdop
  1102.   else
  1103.     text Event Family
  1104.   endif
  1105.  
  1106. endif
  1107. @@GeDF@@BAPM Editing
  1108. use evnt Editing
  1109. @@GeDF@@FAM Record Editing
  1110. settab 60
  1111. settab 110
  1112. settab 200
  1113. toolbg 65535 52428 46530
  1114. set sbrk 1
  1115. MinWidth 425
  1116.  
  1117. pass ficn
  1118.  
  1119. hskip 8
  1120. icon Father View:Husband
  1121. help Husband's individual record
  1122.  
  1123. hskip -1
  1124. icon Mother View:Wife
  1125. help Wife's individual record
  1126.  
  1127. hskip -1
  1128. icon Families View:Families
  1129. help View related family records
  1130.  
  1131. hskip -1
  1132. icon Children View:Children
  1133. help View children
  1134. hskip -1
  1135.  
  1136. pass gmen
  1137. endiconbar
  1138.  
  1139. show HUSB
  1140. show WIFE
  1141.  
  1142. endtoolbar 2
  1143.  
  1144. ! --------- Marriage Event
  1145. newline 1
  1146. set strt #vpos
  1147. show MARR
  1148. showall MARR
  1149. newline
  1150. pass bbox Marriage
  1151.  
  1152. ! --------- children table -----------
  1153. cleartabs
  1154. ! right edge
  1155. set ntab #rmgn
  1156. sub ntab #dlsk
  1157. ! name tab, sex tab, dat tab
  1158. set fwid #ntab
  1159. sub fwid 129
  1160. set nwid #fwid
  1161. mult nwid 54
  1162. div nwid 100
  1163. set dwid #fwid
  1164. sub dwid #nwid
  1165. sub dwid 50
  1166. add nwid 60
  1167.  
  1168. settab 60
  1169. settab #nwid
  1170. settab #ntab
  1171.  
  1172. newline #sbrk
  1173. set strt #vpos
  1174.  
  1175. set chnm 1
  1176. showall CHIL
  1177.  
  1178. ! attach and detach buttoms
  1179. lineskip #dlsk
  1180. newline 2
  1181.  
  1182. tab 1
  1183. hskip 5
  1184. style button
  1185. Picture PlusIcon
  1186. menulink Attach:Child
  1187. help Attach child
  1188.  
  1189. get *this.CHIL
  1190. ifnotempty
  1191.   hskip 5
  1192.   style button
  1193.   picture MinusIcon
  1194.   menulink Detach:Child
  1195.   help Detach child
  1196. endif
  1197.  
  1198. showall NCHI
  1199.  
  1200. newline
  1201. pass bbox Children
  1202. newline
  1203.  
  1204. ! --------- Events -----------
  1205. newline #sbrk
  1206. set strt #vpos
  1207. tab 1
  1208. hskip 5
  1209. cleartabs
  1210. settab #hpos
  1211. set ntab #hpos
  1212. add ntab 115
  1213. settab #ntab
  1214. add ntab 16
  1215. settab #ntab
  1216. set ntab #rmgn
  1217. sub ntab #lmgn
  1218. sub ntab 22
  1219. settab #ntab
  1220.  
  1221. lineskip 2
  1222. set hder 0
  1223.  
  1224. showall ENGA
  1225. showall MARB
  1226. showall MARC
  1227. showall MARL
  1228. showall MARS
  1229. showall DIV
  1230. showall DIVF
  1231. showall ANUL
  1232. showall CENS
  1233. showall EVEN
  1234. showall SLGS
  1235.  
  1236. lineskip #dlsk
  1237. newline
  1238. tab 1
  1239. style button
  1240. picture PlusIcon
  1241. menulink Attach:Event/Attribute
  1242. help Add an event
  1243.  
  1244. hskip 5
  1245. style button
  1246. picture MinusIcon
  1247. menulink Detach:Event/Attribute/Link
  1248. help Delete an event
  1249. get #hder
  1250.  
  1251. cleartabs
  1252. settab 60
  1253. settab 110
  1254. settab 200
  1255. newline
  1256. pass bbox Events
  1257. newline
  1258.  
  1259. ! --------- NOTEs -----------
  1260. ifhastags NOTE
  1261.   newline #sbrk
  1262.   tab 1
  1263.   hskip 5
  1264.   leftskip #hpos
  1265.   set strt #vpos
  1266.   showall NOTE
  1267.   newline
  1268.   pass bbox Notes
  1269. endif
  1270.  
  1271. ! --------- Sources -----------
  1272. ifhastags SOUR
  1273.   newline #sbrk
  1274.   tab 1
  1275.   hskip 5
  1276.   leftskip #hpos
  1277.   set strt #vpos
  1278.   showall SOUR
  1279.   newline
  1280.   pass bbox Sources
  1281. endif
  1282.  
  1283. ! --------- Multimedia -----------
  1284. ifhastags OBJE
  1285.   newline #sbrk
  1286.   tab 1
  1287.   hskip 5
  1288.   leftskip #hpos
  1289.   set strt #vpos
  1290.   showall OBJE
  1291.   newline
  1292.   pass bbox Media
  1293. endif
  1294.  
  1295.  
  1296. ! --------- Attach Buttons ---------
  1297. newline #sbrk
  1298. tab 1
  1299. hskip 5
  1300. leftskip #hpos
  1301. set strt #vpos
  1302. show NOTE
  1303. show SOUR
  1304. show OBJE
  1305. newline
  1306. pass bbox Attach
  1307.  
  1308. ! --------- Submitter Links ---------
  1309. leftSkip #dlmg
  1310. newline #sbrk
  1311. tab 1
  1312. hskip 5
  1313. leftskip #hpos
  1314. set strt #vpos
  1315. show SUBM
  1316. showall SUBM
  1317. newline
  1318. pass bbox Links
  1319.  
  1320. ! --------- The rest -----------
  1321. if more
  1322.   newline #sbrk
  1323.   set strt #vpos
  1324.   style static
  1325.   newline
  1326.   pass bbox Other
  1327.   newline
  1328.   MoveTo #strt
  1329. endif
  1330. cleartabs
  1331. settab 100
  1332. settab 170
  1333.  
  1334. showall CHAN
  1335. showall REFN
  1336. @@GeDF@@WIFE Editing
  1337. get *lev
  1338. if 1
  1339.   ! label on current line
  1340.   NewLine
  1341.   Style label j=right w=72
  1342.   Text Wife:
  1343.  
  1344.   ! display the name
  1345.   HSkip 5
  1346.   Style button
  1347.   ifNotEmpty *valu
  1348.     get *valu.NAME
  1349.     ifNotEmpty
  1350.       Blue
  1351.       Face underline
  1352.       Font times
  1353.       Size 12
  1354.       Text *valu.NAME
  1355.       Link *valu
  1356.       Width 250
  1357.       help View wife
  1358.  
  1359.       HSkip 5
  1360.       get *valu.FAMC
  1361.       if validlink
  1362.         Style button j=center b=3dbutton
  1363.         Text Parents
  1364.         help View parents family
  1365.         Link *it
  1366.       endif
  1367.     else
  1368.       Text <unknown> - Click to Detach Broken Link
  1369.       Justify center
  1370.       Border 3Dbutton
  1371.       MenuLink Detach:Wife
  1372.       Width -20
  1373.     endif
  1374.  
  1375.   else
  1376.     Text Attach Wife
  1377.     Justify center
  1378.     Border 3Dbutton
  1379.     Width 100
  1380.     MenuLink Attach:Wife
  1381.     HSkip 150  
  1382.   endif
  1383.  
  1384.   ! here when in family event 
  1385. else
  1386.   NewLine
  1387.   Show AGE "Wife’s Age:"
  1388. endif
  1389. @@GeDF@@CHIL Editing
  1390. get #chnm
  1391. if 1
  1392.   pass cHDR
  1393. endif
  1394.  
  1395. ! link to child
  1396. newline
  1397. tab
  1398. hskip 5
  1399. style button s=12 tw=1 b=1pfield
  1400. font times
  1401. text #chnm
  1402. add chnm 1
  1403. text ". "
  1404. get *valu.NAME
  1405. ifnotempty
  1406.   text *valu.NAME
  1407.   link *valu
  1408.   blue
  1409.   face underline
  1410.   help View child
  1411. else
  1412.   text <unknown>
  1413. endif
  1414.  
  1415. hskip 3
  1416. style static b=1pfield w=55 j=center
  1417. get *valu.SEX
  1418. if M
  1419.   text Son
  1420. elseif F
  1421.   text Daughter
  1422. else
  1423.   text Unknown
  1424. endif
  1425.  
  1426. hskip 3
  1427. style static b=1pfield w=#dwid j=center
  1428. text *valu.BIRT.DATE
  1429.  
  1430. hskip 3
  1431. get *valu.FAMS
  1432. if validlink
  1433.   style button f=underline s=12 j=center
  1434.   text Family
  1435.   help Family with child as spouse
  1436.   blue
  1437.   font times
  1438.   link *it
  1439. else
  1440.   style static
  1441. endif
  1442. border 1pfield
  1443. tabwidth 1
  1444. @@GeDF@@MARR Editing
  1445. tab 1
  1446. hskip 0
  1447. set oldh #hpos
  1448. HMoveTo #rmgn
  1449. hskip -95
  1450. style 1pcheckedit w=70 f=bold
  1451. text *phra
  1452. help Check if marriage took place
  1453. uncheckedvalue
  1454. hskip 0
  1455. set detH #hpos
  1456. set detV #vpos
  1457.  
  1458. ! show date and place
  1459. HMoveTo #oldh
  1460. show DATE Death
  1461. show PLAC
  1462.  
  1463. ! Rest in pop up window
  1464. set curV #vpos
  1465. MoveTo #detV
  1466. HMoveTo #detH
  1467. hskip 4
  1468. style button w=18
  1469. if more
  1470.   picture DownIcon
  1471. else
  1472.   picture EmptyDownIcon
  1473. endif
  1474. help Marriage detauls
  1475. GroupLink bdEX *name
  1476.   showall All
  1477. endgroup
  1478. MoveTo #curV
  1479. @@GeDF@@ADDR Editing
  1480. ! parent family button
  1481. newline
  1482. style label j=right tw=1
  1483. text Address:
  1484.  
  1485. hskip 5
  1486. style editcont w=-1 b=1pfield
  1487.  
  1488. get *msg
  1489. if Residence
  1490.   cleartabs
  1491.   settab 80
  1492.   settab 100
  1493.   show ADR1
  1494.   show ADR2
  1495.   show CITY
  1496.   show STAE
  1497.   show POST
  1498.   show CTRY
  1499. endif
  1500. @@GeDF@@SUBM Record Editing
  1501. settab 80
  1502. settab 100
  1503. toolbg 65535 52428 46530
  1504.  
  1505. pass ficn
  1506. pass gmen
  1507. endiconbar
  1508.  
  1509. show NAME
  1510. endtoolbar 2
  1511. newline 2
  1512.  
  1513. show ADDR
  1514. show PHON
  1515. showall PHON
  1516. show LANG
  1517.  
  1518. !Multimedia
  1519. ifhastags OBJE
  1520.   3dhrule
  1521.   newline -2
  1522.   style label j=right tw=1
  1523.   text Multimedia:
  1524.   hskip 5
  1525.   showall OBJE
  1526. endif
  1527.  
  1528. style label tw=1 j=right
  1529. text Attach:
  1530. hskip 5
  1531. show OBJE
  1532.  
  1533. if more
  1534.   3dhrule
  1535. endif
  1536. showAll CHAN
  1537. @@GeDF@@SUBM Editing
  1538. style button w=105 j=center b=3Dbutton
  1539. get *valu
  1540. ifnot validlink
  1541.   text "Link "
  1542.   help "Link to a submitter"
  1543. else
  1544.   help "View submitter"
  1545. endif
  1546. text *msg
  1547. text Submitter
  1548. addlink
  1549. hskip 5
  1550. @@GeDF@@NOTE Record Editing
  1551. settab 70
  1552. settab 90
  1553.  
  1554. toolbg 65535 52428 46530
  1555. pass Nlab
  1556. newline -4
  1557. style edittext
  1558.  
  1559. ! Show sources
  1560. lineskip 0
  1561. ifhastags SOUR
  1562.   newline
  1563.   style label tw=1 j=right
  1564.   text Sources:
  1565.   hskip 5
  1566.   leftskip #hpos
  1567.   showall SOUR
  1568. endif
  1569.  
  1570. leftskip #dlmg
  1571. lineskip #dlsk
  1572. newline
  1573. style label tw=1 j=right
  1574. text Attach:
  1575. hskip 5
  1576. Show SOUR Notes
  1577.  
  1578. hskip 10
  1579. showAll CHAN here
  1580.  
  1581. leftskip #dlmg
  1582. newline
  1583.  
  1584.  
  1585. @@GeDF@@REPO Record Editing
  1586. settab 80
  1587. settab 100
  1588. toolbg 65535 52428 46530
  1589. MinWidth 250
  1590.  
  1591. pass ficn
  1592. pass gmen
  1593. endiconbar
  1594.  
  1595. show NAME
  1596.  
  1597. endtoolbar 2
  1598. newline 2
  1599.  
  1600. show ADDR
  1601. showall PHON
  1602.  
  1603. 3dhrule
  1604.  
  1605. ! Show notes
  1606. ifhastags NOTE
  1607.   lineskip 0
  1608.   newline -3
  1609.   style label tw=1 j=right
  1610.   text Notes:
  1611.   hskip 5
  1612.   leftskip #hpos
  1613.   showall NOTE
  1614.   leftSkip #dlmg
  1615.   lineskip #dlsk
  1616. endif
  1617.  
  1618. newline
  1619. style label tw=1 j=right
  1620. text Attach:
  1621. hskip 5
  1622. show NOTE Repos.
  1623. newline
  1624.  
  1625. if more
  1626.   3dhrule
  1627. endif
  1628. showAll CHAN
  1629. showAll REFN
  1630. @@GeDF@@AUTH Editing
  1631. newline
  1632. style label j=right tw=2
  1633. text Author:
  1634.  
  1635. hskip 5
  1636. style editcont w=-1 b=1pfield
  1637. @@GeDF@@TITL Editing
  1638. get *msg
  1639. ifempty
  1640.   get #hder
  1641.   if 0
  1642.     set hder 1
  1643.     pass aHDR
  1644.   endif
  1645.  
  1646.   ! static text with level and tab
  1647.   newline
  1648.   tab 1
  1649.   style label tw=1 j=center b=1pfield f=plain
  1650.   get *name
  1651.   text *it
  1652.   help "Type of attribute"
  1653.  
  1654.   ! edit field with value
  1655.   hskip 3
  1656.   style editvalue b=1pfield tw=1
  1657.  
  1658.   ! details button
  1659.   HSkip 4
  1660.   Style button
  1661.   help *name
  1662.   help " details"
  1663.   if more
  1664.     Picture DownIcon
  1665.   else
  1666.     Picture EmptyDownIcon
  1667.   endif
  1668.   GroupLink iATT *name
  1669.     showall All
  1670.   endgroup
  1671.  
  1672. elseif mm
  1673.   newline
  1674.   style label j=right tw=1
  1675.   text Title:
  1676.  
  1677.   hskip 5
  1678.   style editvalue w=-1 b=1pfield
  1679.  
  1680. else
  1681.   newline
  1682.   style label j=right tw=1
  1683.   text Title:
  1684.  
  1685.   hskip 5
  1686.   style editcont w=-1 b=1pfield
  1687. endif
  1688. @@GeDF@@SOUR Record Editing
  1689. settab 60
  1690. settab 130
  1691. toolbg 65535 52428 46530
  1692. maxlines 2
  1693. set sbrk 1
  1694. MinWidth 250
  1695.  
  1696. pass ficn
  1697. pass gmen
  1698. endiconbar
  1699.  
  1700. show TITL Source
  1701.  
  1702. endtoolbar 2
  1703.  
  1704. ! -------- Reference Details --------
  1705. newline #sbrk
  1706. set strt #vpos
  1707.  
  1708. show ABBR
  1709. show AUTH
  1710. minlines 3
  1711. maxlines 5
  1712. show PUBL
  1713.  
  1714. newline
  1715. pass bbox Reference
  1716.  
  1717. ! ---------- Repository -----------
  1718. ifhastags REPO
  1719.   newline #sbrk
  1720.   set strt #vpos
  1721.   showall REPO
  1722.   newline
  1723.   pass bbox Reposit.
  1724.   newline
  1725. else
  1726.   set arep 1
  1727. endif
  1728.  
  1729. ! --------- Text from the source ---------
  1730. newline #sbrk
  1731. set strt #vpos
  1732. show TEXT
  1733. newline
  1734. pass bbox Text
  1735.  
  1736. ! --------- Data in Record ---------
  1737. newline #sbrk
  1738. set strt #vpos
  1739. show DATA
  1740. newline
  1741. pass bbox Data
  1742.  
  1743. ! --------- NOTEs -----------
  1744. ifhastags NOTE
  1745.   newline #sbrk
  1746.   tab 1
  1747.   hskip 5
  1748.   leftskip #hpos
  1749.   set strt #vpos
  1750.   showall NOTE
  1751.   newline
  1752.   pass bbox Notes
  1753. endif
  1754.  
  1755. ! --------- Multimedia -----------
  1756. ifhastags OBJE
  1757.   newline #sbrk
  1758.   tab 1
  1759.   hskip 5
  1760.   leftskip #hpos
  1761.   set strt #vpos
  1762.   showall OBJE
  1763.   newline
  1764.   pass bbox Media
  1765. endif
  1766.  
  1767. ! --------- Attach Buttons ---------
  1768. newline #sbrk
  1769. tab 1
  1770. hskip 5
  1771. leftskip #hpos
  1772. set strt #vpos
  1773. show NOTE
  1774. show OBJE
  1775. get #arep
  1776. if 1
  1777.   show REPO
  1778. endif
  1779. newline
  1780. pass bbox Attach
  1781.  
  1782. ! --------- The rest -----------
  1783. if more
  1784.   newline #sbrk
  1785.   set strt #vpos
  1786.   style static
  1787.   newline
  1788.   pass bbox Other
  1789.   newline
  1790.   MoveTo #strt
  1791. endif
  1792. cleartabs
  1793. settab 100
  1794. settab 170
  1795.  
  1796. showall CHAN
  1797. showall REFN
  1798. @@GeDF@@PUBL Editing
  1799. newline
  1800. style label j=right tw=2
  1801. text Publisher:
  1802.  
  1803. hskip 5
  1804. style editcont w=-1 b=1pfield
  1805. @@GeDF@@REPO Editing
  1806. ! Note buttom
  1807. get *valu
  1808. if tagexists
  1809.   tab 1
  1810.   hskip 5
  1811.   style button w=-1 s=12 f=underline
  1812.   get *it.NAME
  1813.   ifempty
  1814.     text "Unknown Repository"
  1815.   else
  1816.     text *it
  1817.   endif
  1818.   blue
  1819.   font times
  1820.   link *valu
  1821.   help View repository record
  1822.  
  1823.   cleartabs
  1824.   settab 60
  1825.   settab 150
  1826.   show CALN
  1827.  
  1828. else
  1829.   style button j=center b=3dbutton h=22
  1830.   text "Link To Repository"
  1831.   border 3dbutton 4
  1832.   width -6
  1833.   addlink
  1834.   hskip 5
  1835. endif
  1836. @@GeDF@@SOUR Editing
  1837. get *rec
  1838. if HEAD
  1839.   style label j=right tw=1
  1840.   text System ID:
  1841.  
  1842.   hskip 5
  1843.   style editvalue w=-1 b=1pfield
  1844.  
  1845.   show NAME
  1846.   endtoolbar
  1847.   show VERS
  1848.   show CORP
  1849.   show DATA
  1850. else
  1851.   if tagexists
  1852.     get #lmgn
  1853.     if #dlmg
  1854.       newline
  1855.       newline
  1856.       style label tw=2 j=right
  1857.       text Source:
  1858.       hskip 5
  1859.     endif
  1860.     get *valu
  1861.     if validlink
  1862.       Style button b=3dbutton j=center h=14
  1863.       get *it.ABBR
  1864.       ifempty
  1865.         get *valu.TITL
  1866.         ifempty
  1867.           get <Unnamed Source>
  1868.         endif
  1869.       endif
  1870.       text "Details"
  1871.       help Details on this citation
  1872.       width -12
  1873.       structlink SOUa
  1874.     
  1875.       hskip 5
  1876.       style button w=-1 s=12 f=underline
  1877.       help View source record
  1878.       text *it
  1879.       link *valu
  1880.     else
  1881.       Style button s=12 f=underline w=-1
  1882.       text "<Embedded Source>"
  1883.       help Click to edit source information
  1884.       structlink SOUb
  1885.     endif
  1886.     font times
  1887.     blue
  1888.   else
  1889.     style button
  1890.     Picture SourceIcon
  1891.     help Add source
  1892.     addlink
  1893.     hskip 5
  1894.   endif
  1895. endif
  1896. @@GeDF@@SOUa Record Editing
  1897. ! Source citation in separate window, but link
  1898. !  to actual source
  1899.  
  1900. ! link to the source
  1901. settab 90
  1902. settab 90
  1903.  
  1904. toolbg 65535 52428 46530
  1905.  
  1906. style label j=right tw=1
  1907. text Source:
  1908.  
  1909. hskip 5
  1910. style button w=-1 f=underline s=12
  1911. get *valu
  1912. if validlink
  1913.   get *it.ABBR
  1914.   ifempty
  1915.     get *valu.TITL
  1916.     ifempty
  1917.       get <Unnamed Source>
  1918.     endif
  1919.   endif
  1920.   text *it
  1921.   help View source record
  1922. else
  1923.   text "Link Source"
  1924. endif
  1925. addlink
  1926. font times
  1927. blue
  1928. endtoolbar
  1929.  
  1930. show PAGE
  1931. show EVEN incite
  1932. show DATA
  1933. show QUAY
  1934.  
  1935. !Multimedia
  1936. ifhastags OBJE
  1937.   newline
  1938.   style label tw=2 j=right
  1939.   text Multimedia:
  1940.   hskip 5
  1941.   showall OBJE
  1942. endif
  1943.  
  1944. ! Show notes
  1945. newline
  1946. lineskip 0
  1947. ifhastags NOTE
  1948.   newline -1
  1949.   style label tw=2 j=right
  1950.   text Notes:
  1951.   hskip 5
  1952.   leftskip #hpos
  1953.   showall NOTE
  1954.   leftSkip #dlmg
  1955. endif
  1956.  
  1957. newline
  1958. lineskip #dlsk
  1959. style label j=right tw=1
  1960. text Attach:
  1961. hskip 5
  1962. show NOTE *name
  1963. show OBJE
  1964. @@GeDF@@DATA Editing
  1965. get *rec
  1966. if HEAD
  1967.   newline
  1968.   style label tw=1 j=right
  1969.   text Source Data:
  1970.  
  1971.   hskip 5
  1972.   style editvalue w=-1 b=1pfield
  1973.  
  1974.   cleartabs
  1975.   settab #tab2
  1976.   show DATE
  1977.   show COPR
  1978.  
  1979. elseif SOUR
  1980.   newline
  1981.   set ntab 60
  1982.   sub ntab #lmgn
  1983.   add ntab 3
  1984.   hskip #ntab
  1985.   style label w=-1
  1986.   text Type of Data Recorded in this Source:
  1987.   cellbg 0xD4 0xB4 0xA4
  1988.   border frame rtbl
  1989.   cellup 30146 15073 10485
  1990.  
  1991.   cleartabs
  1992.   settab 120
  1993.   show EVEN
  1994.   showall EVEN
  1995.   settab 40
  1996.   show AGNC
  1997.  
  1998.   ! Show notes
  1999.   ifhastags NOTE
  2000.     lineskip 0
  2001.     newline
  2002.     style label tw=2 j=right
  2003.     text Notes:
  2004.     hskip 5
  2005.     leftskip #hpos
  2006.     showall NOTE
  2007.     leftSkip #dlmg
  2008.     lineskip #dlsk
  2009.   endif
  2010.  
  2011.   newline
  2012.   style label tw=2 j=right
  2013.   text Attach:
  2014.   hskip 5
  2015.   show NOTE Data
  2016.  
  2017. else
  2018.   show DATE
  2019.   show TEXT
  2020. endif
  2021. @@GeDF@@TEXT Editing
  2022. get *rec
  2023. if SOUR
  2024.   NewLine
  2025.   tab 1
  2026.   hskip 5
  2027.   style button f=underline s=12 w=-1
  2028.   blue
  2029.   font times
  2030.   get *valu
  2031.   ifempty
  2032.     get *next
  2033.   endif
  2034.   ifempty
  2035.     text Enter text from this source...
  2036.   else
  2037.     text *it
  2038.   endif
  2039.   structlink text
  2040.   help Click to view and edit text
  2041.  
  2042. else
  2043.   Style label tw=2 j=right
  2044.   Text *name
  2045.   Text :
  2046.  
  2047.   HSkip 5
  2048.   MinLines 5
  2049.   Style editcont b=1pfield w=-1
  2050. endif
  2051. @@GeDF@@PAGE Editing
  2052. newline
  2053. style label j=right tw=1
  2054. text Page:
  2055.  
  2056. ! edit the date
  2057. hskip 5
  2058. style editvalue b=1pfield w=-1
  2059. @@GeDF@@SOUb Record Editing
  2060. ! Source citation in separate window for embedded
  2061. !   citation
  2062.  
  2063. ! link to the source
  2064. settab 72
  2065. settab 72
  2066. style label j=right tw=1
  2067. text Source:
  2068.  
  2069. hskip 5
  2070. style editcont b=1pfield w=-1
  2071.  
  2072. show TEXT
  2073.  
  2074. ! Show notes
  2075. newline
  2076. lineskip 0
  2077. ifhastags NOTE
  2078.   newline -1
  2079.   style label tw=2 j=right
  2080.   text Notes:
  2081.   hskip 5
  2082.   leftskip #hpos
  2083.   showall NOTE
  2084.   leftSkip #dlmg
  2085. endif
  2086.  
  2087. newline
  2088. lineskip #dlsk
  2089. style label j=right tw=1
  2090. text Attach:
  2091. hskip 5
  2092. show NOTE *name
  2093. @@GeDF@@ANCI Editing
  2094. style button w=105 b=3dbutton j=center
  2095. if tagexists
  2096.   text Ancestor Interest
  2097.   help Submitter with interest in ancectors
  2098. else
  2099.   text Add Ancest. Interest
  2100.   help Link to submitter with ancest. interest
  2101. endif
  2102. addlink
  2103. hskip 5
  2104. @@GeDF@@DESI Editing
  2105. style button w=105 j=center b=3dbutton
  2106. if tagexists
  2107.   text Decendent Interest
  2108.   help Submitter with interest in descendants
  2109. else
  2110.   text Add Descend. Interest
  2111.   help Link to submitter with descend. interest
  2112. endif
  2113. addlink
  2114. hskip 5
  2115. @@GeDF@@BURI Editing
  2116. use evnt Editing
  2117. @@GeDF@@HEAD Record Editing
  2118. settab 90
  2119. settab 120
  2120. set tab1 90
  2121. set tab2 120
  2122. toolbg 65535 52428 46530
  2123. show SOUR
  2124. 3dhrule
  2125. show SUBM
  2126. show SUBN
  2127. showall _HME
  2128. 3dhrule
  2129. show DEST
  2130. show DATE
  2131. show FILE
  2132. show COPR
  2133. show GEDC
  2134. show CHAR
  2135. show LANG
  2136. show PLAC
  2137. 3dhrule
  2138.  
  2139. ! Show notes
  2140. ifhastags NOTE
  2141.   lineskip 0
  2142.   newline -3
  2143.   style label tw=1 j=right
  2144.   text Notes:
  2145.   hskip 5
  2146.   leftskip #hpos
  2147.   showall NOTE
  2148.   leftSkip #dlmg
  2149.   lineskip #dlsk
  2150. endif
  2151.  
  2152. newline
  2153. style label tw=1 j=right
  2154. text Attach:
  2155. hskip 5
  2156. show NOTE Header
  2157.  
  2158. 3dhrule
  2159. @@GeDF@@CORP Editing
  2160. newline
  2161. style label j=right tw=1
  2162. text Corporation:
  2163.  
  2164. hskip 5
  2165. style editvalue b=1pfield w=-1
  2166.  
  2167. newline
  2168. show ADDR
  2169. @@GeDF@@COPR Editing
  2170. ! label on current line
  2171. newline
  2172. style label tw=1 j=right
  2173. text *name
  2174. text :
  2175.  
  2176. ! edit the date
  2177. hskip 5
  2178. style editvalue b=1pfield w=-1
  2179. @@GeDF@@SUBN Editing
  2180. style button w=100 j=center b=3dbutton
  2181. text Submission
  2182. link *valu
  2183. help View submission record
  2184. hskip 5
  2185. @@GeDF@@GEDC Editing
  2186. newline
  2187. cleartabs
  2188. settab #tab2
  2189. show VERS GEDCOM
  2190. settab #tab1
  2191. show FORM
  2192. @@GeDF@@DEST Editing
  2193. use COPR Editing
  2194. @@GeDF@@FILE Editing
  2195. ! label on current line
  2196. NewLine
  2197. Style label tw=1 j=right
  2198. get *msg
  2199. if url
  2200.   Text URL:
  2201. else
  2202.   Text *name
  2203.   Text :
  2204. endif
  2205.  
  2206. ! edit the date
  2207. HSkip 5
  2208. Style editvalue b=1pfield w=-1
  2209. @@GeDF@@OBJE Record Editing
  2210. settab 90
  2211. settab 120
  2212. newline 3
  2213.  
  2214. lineskip 0
  2215. style label w=-1 j=center
  2216. text GEDitCOM follows the recommended GEDCOM practice
  2217. text " which is to support"
  2218. border 3dframe ltr
  2219. cellbg 0xd4 0xb4 0xa4
  2220.  
  2221. newline
  2222. style label w=-1 j=center
  2223. text  Multimedia by links to separate files.
  2224. text " This record contains encoded digital data"
  2225. border 3dframe lr
  2226. cellbg 0xd4 0xb4 0xa4
  2227.  
  2228. newline
  2229. style label w=-1 j=center
  2230. text and cannot be viewed in GEDitCOM.
  2231. text " You can click below to see the raw data."
  2232. border 3dframe lrb
  2233. cellbg 0xd4 0xb4 0xa4
  2234.  
  2235. lineskip #dlsk
  2236. newline 5
  2237. show TITL mm
  2238. show FORM
  2239. show BLOB
  2240.  
  2241. HideExcess
  2242. @@GeDF@@SUBN Record Editing
  2243. settab 80
  2244. settab 140
  2245.  
  2246. pass ficn
  2247. endiconbar
  2248.  
  2249. style label j=right tw=2
  2250. text Submitter:
  2251.  
  2252. hskip 5
  2253. show SUBM
  2254.  
  2255. newline
  2256. show FAMF
  2257. show TEMP
  2258. show ANCE
  2259. show DESC
  2260. show ORDI
  2261.  
  2262. ZoomWindow
  2263. @@GeDF@@HUSB Editing
  2264. get *lev
  2265. if 1
  2266.   ! label on current line
  2267.   NewLine
  2268.   Style label j=right w=72
  2269.   Text Husband:
  2270.  
  2271.   ! display name
  2272.   HSkip 5
  2273.   Style button
  2274.   ifNotEmpty *valu
  2275.     get *valu.NAME
  2276.     ifNotEmpty
  2277.       Blue
  2278.       Face underline
  2279.       Font times
  2280.       Size 12
  2281.       Text *it
  2282.       Link *valu
  2283.       Width 250
  2284.       help View husband
  2285.  
  2286.       HSkip 5
  2287.       get *valu.FAMC
  2288.       if validlink
  2289.         Style button j=center b=3dbutton
  2290.         Text Parents
  2291.         help View parents family
  2292.         Link *it
  2293.       endif
  2294.     else
  2295.       Text <unknown> - Click to Detach Broken Link
  2296.       Justify center
  2297.       Border 3Dbutton
  2298.       MenuLink Detach:Husband
  2299.       Width -20
  2300.     endif
  2301.  
  2302.   else
  2303.     Text Attach Husband
  2304.     Justify center
  2305.     Border 3Dbutton
  2306.     MenuLink Attach:Husband
  2307.     Width 100
  2308.     HSkip 150  
  2309.   endif
  2310.  
  2311.   ! here when in family event 
  2312. else
  2313.   NewLine
  2314.   Show AGE "Husband’s Age:"
  2315. endif
  2316. @@GeDF@@WILL Editing
  2317. use evnt Editing
  2318. @@GeDF@@NATU Editing
  2319. use evnt Editing
  2320. @@GeDF@@ORDN Editing
  2321. use evnt Editing
  2322. @@GeDF@@INDI Record Printing
  2323. bg 0xFF 0xFF 0xFF
  2324. leftskip 0
  2325. lineskip 0
  2326. minlines 1
  2327. settab 80
  2328. settab 120
  2329. pass prhd Individual
  2330. showall NAME INDI
  2331. show SEX
  2332. show BIRT
  2333. show DEAT
  2334.  
  2335. ifhastags FAMS
  2336.   hrule
  2337.   hrule 1
  2338.   newline
  2339.   style label w=-1 j=center
  2340.   text Marriages
  2341.   hrule
  2342.   showall FAMS
  2343. endif
  2344.  
  2345. ifhastags FAMC
  2346.   hrule
  2347.   hrule 1
  2348.   newline
  2349.   style label w=-1 j=center
  2350.   text Parents
  2351.   hrule
  2352.   showall FAMC
  2353. endif
  2354.  
  2355. hrule
  2356. hrule 1
  2357. newline
  2358. style label w=-1 j=center
  2359. text Additional Information
  2360. newline
  2361.  
  2362. set oldv #vpos
  2363. showall BAPM
  2364. showall CHR
  2365. showall BLES
  2366. showall BARM
  2367. showall BASM
  2368. showall ADOP
  2369. showall CHRA
  2370. showall CONF
  2371. showall FCOM
  2372. showall ORDN
  2373. showall GRAD
  2374. showall EMIG
  2375. showall IMMI
  2376. showall NATU
  2377. showall CENS
  2378. showall RETI
  2379. showall PROB
  2380. showall BURI
  2381. showall WILL
  2382. showall CREM
  2383. showall EVEN
  2384. showall BAPL
  2385. showall CONL
  2386. showall ENDL
  2387. showall SLGC
  2388.  
  2389. showall RESI
  2390. showall OCCU
  2391. showall EDUC
  2392. showall DSCR
  2393. showall RELI
  2394. showall SSN
  2395. showall IDNO
  2396. showall PROP
  2397. showall CAST
  2398. showall NCHI
  2399. showall NMR
  2400. showall TITL
  2401. showall NATI
  2402.  
  2403. showall OBJE
  2404. showall ALIA
  2405. showall ASSO
  2406.  
  2407. ifhastags SOUR
  2408.   hrule
  2409.   hrule 1
  2410.   newline
  2411.   style label w=-1 j=center
  2412.   text Additional Sources
  2413.   hrule
  2414.   showall SOUR
  2415. endif
  2416.  
  2417. ifhastags NOTE
  2418.   hrule
  2419.   hrule 1
  2420.   newline
  2421.   style label w=-1 j=center
  2422.   text Additional Notes
  2423.   hrule
  2424.   showall NOTE
  2425. endif
  2426.  
  2427. if more
  2428.   hrule
  2429.   hrule 1
  2430.   newline
  2431.   style label w=-1 j=center
  2432.   text Miscellaneous Information
  2433.   hrule
  2434. endif
  2435.  
  2436.  
  2437. @@GeDF@@NAME Printing
  2438. ! start new line and label
  2439. NewLine
  2440. Style label
  2441. Text Name:
  2442. get *msg
  2443. if INDI
  2444.   Size 14
  2445.   Red
  2446. endif
  2447. TabWidth 2
  2448.  
  2449. ! edit name
  2450. HSkip 5
  2451. Style editvalue w=-1
  2452. get *msg
  2453. if INDI
  2454.   Size 14
  2455.   Red
  2456.  
  2457.   Set rtjs 1
  2458.   ShowAll NPFX
  2459.   ShowAll GIVN
  2460.   ShowAll NICK
  2461.   ShowAll SPFX
  2462.   ShowAll SURN
  2463.   ShowAll SURN
  2464.   ShowAll NSFX
  2465.   ShowAll NOTE Name
  2466.   ShowAll SOUR Name
  2467.   Set rtjs 0
  2468.  
  2469. endif
  2470. @@GeDF@@BIRT Printing
  2471. ! New line and enter label
  2472. hrule 2
  2473. newline 2
  2474. style label
  2475. text Birth:
  2476. tabwidth 1
  2477.  
  2478. ! show date and place
  2479. set rtjs 1
  2480. show DATE
  2481. newline
  2482. show PLAC
  2483. showall ADDR
  2484. showall TYPE
  2485. showall AGNC
  2486. showall NOTE Birth
  2487. showall SOUR Birth
  2488. set rtjs 0
  2489. @@GeDF@@DATE Printing
  2490. get *msg
  2491. if nolabel
  2492.   hskip 5
  2493.   style editvalue w=100
  2494. else
  2495.   ! label on current line
  2496.   style label
  2497.   text Date:
  2498.   get *rec
  2499.   if HEAD
  2500.     tabwidth 2
  2501.     get #rtjs
  2502.     if 1
  2503.       justify right
  2504.     endif
  2505.   else
  2506.     justify right
  2507.     tabwidth 1
  2508.   endif
  2509.  
  2510.   ! edit the date
  2511.   hskip 5
  2512.   style editvalue w=-1
  2513. endif
  2514. @@GeDF@@SEX Printing
  2515. ! label on current line
  2516. newline
  2517. style label
  2518. text Sex:
  2519. tabwidth 2
  2520.  
  2521. ! edit the place
  2522. hskip 5
  2523. style static w=-1
  2524. get *valu
  2525. if M
  2526.   text Male
  2527. elseif F
  2528.   text Female
  2529. else
  2530.   text Unknown
  2531. endif
  2532. @@GeDF@@DEAT Printing
  2533. ! New line and enter label
  2534. hrule 2
  2535. newline 2
  2536. style label
  2537. text *name
  2538. text :
  2539. get *name
  2540. if Death
  2541.   tabwidth 1
  2542. else
  2543.   tabwidth 2
  2544.   hskip 5
  2545.   style editvalue w=-1
  2546.   newline
  2547.   if more
  2548.     tab 1
  2549.   endif
  2550. endif
  2551.  
  2552. ! show date and place
  2553. set rtjs 1
  2554. showall DATE
  2555. showall AGE
  2556. newline
  2557. showall PLAC
  2558. showall ADDR
  2559. showall TYPE
  2560. showall AGNC
  2561. showall CAUS
  2562. showall NOTE *name
  2563. showall SOUR *name
  2564. set rtjs 0
  2565. @@GeDF@@FAMS Printing
  2566. ! Spouse type
  2567. newline
  2568. tabwidth 2
  2569. style label
  2570. get *this.SEX
  2571. if F
  2572.   text Husband:
  2573.   get *valu.HUSB
  2574. else
  2575.   text Wife:
  2576.   get *valu.WIFE
  2577. endif
  2578.  
  2579. ! Spouse Name
  2580. hskip 5
  2581. style static w=-1
  2582. if validlink
  2583.   text *it.NAME
  2584.   link *it
  2585. else
  2586.   text <unknown>
  2587. endif
  2588.  
  2589. get *valu.MARR.DATE
  2590. ifnotempty
  2591.   newline
  2592.   style label j=right tw=2
  2593.   text Date:
  2594.  
  2595.   hskip 5
  2596.   style static w=-1
  2597.   text *it
  2598. endif
  2599.  
  2600. get *valu.MARR.PLAC
  2601. ifnotempty
  2602.   newline
  2603.   style label j=right tw=2
  2604.   text Place:
  2605.  
  2606.   hskip 5
  2607.   style static w=-1
  2608.   text *it
  2609. endif
  2610.  
  2611. showall NOTE Marriage
  2612. @@GeDF@@FAMC Printing
  2613. ! parent family button
  2614. newline
  2615. style label w=60
  2616. text Parents:
  2617.  
  2618. ! Father
  2619. hskip 0
  2620. style label j=right tw=2
  2621. text Father:
  2622.  
  2623. hskip 5
  2624. style static w=-1
  2625. get *valu.HUSB
  2626. if validlink
  2627.   text *it.NAME
  2628. else
  2629.   text <unknown>
  2630. endif
  2631.  
  2632. ! Mother
  2633. newline
  2634. style label j=right tw=2
  2635. text Mother:
  2636.  
  2637. hskip 5
  2638. style static w=-1
  2639. get *valu.WIFE
  2640. if validlink
  2641.   text *it.NAME
  2642.   link *it
  2643. else
  2644.   text <unknown>
  2645. endif
  2646.  
  2647. set rtjs 1
  2648. showall PEDI
  2649. showall NOTE Parents
  2650. showall ADOP noline
  2651. set rtjs 0
  2652. @@GeDF@@NOTE Printing
  2653. if tagexists
  2654.   newline
  2655.   style label
  2656.   get *lev
  2657.   if 1
  2658.     get *msg
  2659.     ifempty
  2660.       width 40
  2661.     else
  2662.       tabwidth 2
  2663.     endif
  2664.   else
  2665.     tabwidth 2
  2666.   endif
  2667.   get *msg
  2668.   ifnotempty
  2669.     text *msg
  2670.     text " "
  2671.     ifnot Header
  2672.       justify right
  2673.     endif
  2674.   endif
  2675.   text Notes:
  2676.  
  2677.   hskip 5
  2678.   get *valu
  2679.   if validlink
  2680.     InsertRecord *it
  2681.   else
  2682.     style EditText
  2683.   endif
  2684. endif
  2685. @@GeDF@@SOUR Printing
  2686. get *rec
  2687. if HEAD
  2688.   Style label
  2689.   Text System ID:
  2690.   TabWidth 2
  2691.  
  2692.   HSkip 5
  2693.   Style editvalue w=-1
  2694.  
  2695.   ShowAll NAME
  2696.   Set rtjs 1
  2697.   ShowAll VERS
  2698.   ShowAll CORP
  2699.   ShowAll DATA
  2700.   Set rtjs 0
  2701. else
  2702.   NewLine
  2703.   Style label
  2704.   TabWidth 2
  2705.   get *msg
  2706.   ifNotEmpty
  2707.     Text *msg
  2708.     Text " "
  2709.     Justify right
  2710.   endif
  2711.   Text Source:
  2712.  
  2713.   HSkip 5
  2714.   get *valu
  2715.   if validlink
  2716.     ! title source
  2717.     Style static w=-1
  2718.     get *it.ABBR
  2719.     ifEmpty
  2720.       get *valu.TITL
  2721.       ifEmpty
  2722.         get <Unnamed Source>
  2723.       endif
  2724.     endif
  2725.     Text *it
  2726.     Set rtjs 1
  2727.     ShowAll PAGE
  2728.     ShowAll EVEN incite
  2729.     ShowAll DATA
  2730.     ShowAll QUAY
  2731.     ShowAll NOTE Source
  2732.     Set rtjs 0
  2733.   else
  2734.     Style edittext w=-1
  2735.     Set rtjs 1
  2736.     showall TEXT
  2737.     showall NOTE Source
  2738.     Set rtjs 0
  2739.   endif
  2740.  
  2741. endif
  2742. @@GeDF@@TEXT Printing
  2743. newline
  2744. style label
  2745. text Text:
  2746. tabwidth 2
  2747. get #rtjs
  2748. if 1
  2749.   justify right
  2750. endif
  2751.  
  2752. ! edit the date
  2753. hskip 5
  2754. style edittext w=-1
  2755. @@GeDF@@BAPM Printing
  2756. use DEAT Printing
  2757. @@GeDF@@NATU Printing
  2758. use DEAT Printing
  2759. @@GeDF@@DATA Printing
  2760. get *rec
  2761. if HEAD
  2762.   style label
  2763.   text Source Data:
  2764.   tabwidth 2
  2765.  
  2766.   hskip 5
  2767.   style editvalue w=-1
  2768.  
  2769.   newline
  2770.   showall DATE
  2771.   showall COPR
  2772. elseif SOUR
  2773.   3dhrule
  2774.   style label w=-1
  2775.   text Type of Data Recorded in this Source
  2776.   set rtjs 1
  2777.   showall EVEN
  2778.   set rtjs 0
  2779.   showall AGNC
  2780.   showall NOTE
  2781. else
  2782.   get *DATE
  2783.   ifnotempty
  2784.     newline
  2785.     tab 1
  2786.     show DATE
  2787.   endif
  2788. endif
  2789. @@GeDF@@BURI Printing
  2790. use DEAT Printing
  2791. @@GeDF@@ORDN Printing
  2792. use DEAT Printing
  2793. @@GeDF@@WILL Printing
  2794. use DEAT Printing
  2795. @@GeDF@@CHR Editing
  2796. use evnt Editing
  2797. @@GeDF@@CREM Editing
  2798. use evnt Editing
  2799. @@GeDF@@ADOP Editing
  2800. get *msg
  2801. ifEmpty
  2802.   get #hder
  2803.   if 0
  2804.     set hder 1
  2805.     pass eHDR
  2806.   endif
  2807.   NewLine
  2808.   Tab 1
  2809.   Style label f=plain tw=1 b=1pfield j=center
  2810.   Text *name
  2811.   help Type of event
  2812.  
  2813.   HSkip 2
  2814.   Style 1pcheckedit w=10
  2815.   UncheckedValue
  2816.   help Can check to show event has occurred
  2817.  
  2818.   Show DATE Event
  2819.  
  2820.   HSkip 4
  2821.   Style button w=18
  2822.   help *name
  2823.   help " details"
  2824.   if more
  2825.     Picture DownIcon
  2826.   else
  2827.     Picture EmptyDownIcon
  2828.   endif
  2829.   GroupLink iEVT *name
  2830.     ShowAll ALL
  2831.   EndGroup
  2832. else
  2833.   HSkip 5
  2834.   Style label
  2835.   Text Adopted By:
  2836.   Width -2
  2837.  
  2838.   HSkip 5
  2839.   Style popupedit w=90 b=popbutton j=center s=9
  2840.   Font geneva
  2841.   PopupItem Both:BOTH
  2842.   PopupItem Husband:HUSB
  2843.   PopupItem Wife:WIFE
  2844. endif
  2845. @@GeDF@@BARM Editing
  2846. use evnt Editing
  2847. @@GeDF@@BASM Editing
  2848. use evnt Editing
  2849. @@GeDF@@BLES Editing
  2850. use evnt Editing
  2851. @@GeDF@@CONF Editing
  2852. use evnt Editing
  2853. @@GeDF@@FCOM Editing
  2854. use evnt Editing
  2855. @@GeDF@@EMIG Editing
  2856. use evnt Editing
  2857. @@GeDF@@IMMI Editing
  2858. use evnt Editing
  2859. @@GeDF@@CENS Editing
  2860. use evnt Editing
  2861. @@GeDF@@PROB Editing
  2862. use evnt Editing
  2863. @@GeDF@@RETI Editing
  2864. use evnt Editing
  2865. @@GeDF@@GRAD Editing
  2866. use evnt Editing
  2867. @@GeDF@@EVEN Editing
  2868. get *rec
  2869. if SOUR
  2870.   Style label j=right tw=1
  2871.   Text "Events:"
  2872.  
  2873.   HSkip 5
  2874.   Style editvalue w=-1 b=1pfield
  2875.  
  2876.   cleartabs
  2877.   settab 125
  2878.   Show DATE
  2879.   SetTab 40
  2880.   Show PLAC
  2881.  
  2882. else
  2883.   get *msg
  2884.   if incite
  2885.     Style label j=right tw=1
  2886.     Text "Event:"
  2887.  
  2888.     HSkip 5
  2889.     Style editvalue w=-1 b=1pfield
  2890.  
  2891.     Show ROLE
  2892.  
  2893.   else
  2894.     get #hder
  2895.     if 0
  2896.       set hder 1
  2897.       pass eHDR
  2898.     endif
  2899.     NewLine
  2900.     Tab 1
  2901.     Style label f=plain tw=1 b=1pfield j=center
  2902.     ifempty *TYPE
  2903.       Text *name
  2904.     else
  2905.       Text *TYPE
  2906.     endif
  2907.     help Type of event
  2908.  
  2909.     HSkip 2
  2910.     Style 1pcheckedit w=10
  2911.     UncheckedValue
  2912.     help Can check to show event has occurred
  2913.  
  2914.     Show DATE Event
  2915.  
  2916.     HSkip 4
  2917.     Style button w=18
  2918.     ifempty *TYPE
  2919.       help *name
  2920.     else
  2921.       help *TYPE
  2922.     endif
  2923.     help " details"
  2924.     if more
  2925.       Picture DownIcon
  2926.     else
  2927.       Picture EmptyDownIcon
  2928.     endif
  2929.     get *TYPE
  2930.     ifempty
  2931.       get *name
  2932.     endif
  2933.     GroupLink iEVT *it
  2934.       ShowAll ALL
  2935.     EndGroup
  2936.   endif
  2937. endif
  2938. @@GeDF@@CHAR Editing
  2939. ! label on current line
  2940. newline
  2941. style label j=right tw=1
  2942. text *name
  2943. text :
  2944.  
  2945. ! edit the date
  2946. hskip 5
  2947. style button w=-1 b=1pfield s=12
  2948. CellBg 0xd4 0xb4 0xa4
  2949. text *valu
  2950. font times
  2951. MenuLink File:Character Set...
  2952. help Click to change character set
  2953.  
  2954. cleartabs
  2955. settab #tab2
  2956. show VERS Char. Set
  2957. @@GeDF@@LANG Editing
  2958. use COPR Editing
  2959. @@GeDF@@ENGA Editing
  2960. use evnt Editing
  2961. @@GeDF@@MARB Editing
  2962. use evnt Editing
  2963. @@GeDF@@MARC Editing
  2964. use evnt Editing
  2965. @@GeDF@@ANUL Editing
  2966. use evnt Editing
  2967. @@GeDF@@DIV Editing
  2968. use evnt Editing
  2969. @@GeDF@@DIVF Editing
  2970. use evnt Editing
  2971. @@GeDF@@MARL Editing
  2972. use evnt Editing
  2973. @@GeDF@@MARS Editing
  2974. use evnt Editing
  2975. @@GeDF@@VERS Editing
  2976. ! label on current line
  2977. style label j=right tw=1
  2978. get *msg
  2979. ifnotempty
  2980.   text *it
  2981.   text " "
  2982. endif
  2983. text *name
  2984. text ":"
  2985.  
  2986. ! edit the version
  2987. hskip 5
  2988. get *msg
  2989. if "Char. Set"
  2990.   style button w=-1 b=1pfield s=12
  2991.   CellBg 0xd4 0xb4 0xa4
  2992.   text *valu
  2993.   font times
  2994.   MenuLink File:Character Set...
  2995.   help Click to change character set
  2996. else
  2997.   style editvalue w=-1 b=1pfield
  2998. endif
  2999. @@GeDF@@BARM Printing
  3000. use DEAT Printing
  3001. @@GeDF@@BASM Printing
  3002. use DEAT Printing
  3003. @@GeDF@@BLES Printing
  3004. use DEAT Printing
  3005. @@GeDF@@CENS Printing
  3006. use DEAT Printing
  3007. @@GeDF@@CONF Printing
  3008. use DEAT Printing
  3009. @@GeDF@@CREM Printing
  3010. use DEAT Printing
  3011. @@GeDF@@DIV Printing
  3012. use DEAT Printing
  3013. @@GeDF@@DIVF Printing
  3014. use DEAT Printing
  3015. @@GeDF@@EMIG Printing
  3016. use DEAT Printing
  3017. @@GeDF@@ENGA Printing
  3018. use DEAT Printing
  3019. @@GeDF@@EVEN Printing
  3020. get *rec
  3021. if SOUR
  3022.   newline
  3023.   style label
  3024.   text Events Recorded:
  3025.   tabwidth 2
  3026.  
  3027.   hskip 5
  3028.   style editvalue w=-1
  3029.  
  3030.   newline
  3031.   tab 1
  3032.   show DATE
  3033.   show PLAC
  3034. else
  3035.   get *msg
  3036.   if incite
  3037.     style label tw=2 j=right
  3038.     text Event:
  3039.  
  3040.     hskip 5
  3041.     style editvalue w=-1
  3042.  
  3043.     showAll ROLE
  3044.  
  3045.   else
  3046.     ! New line and enter label
  3047.     hrule 2
  3048.     newline 2
  3049.     style label tw=1
  3050.     ifnotempty *TYPE
  3051.       text *TYPE
  3052.     else
  3053.       text *name
  3054.     endif
  3055.     text :
  3056.  
  3057.     ! show date and place
  3058.     set rtjs 1
  3059.     show DATE
  3060.     showall AGE
  3061.     show PLAC
  3062.     showall ADDR
  3063.     showall TYPE
  3064.     showall AGNC
  3065.     showall CAUS
  3066.     showall NOTE *name
  3067.     showall SOUR *name
  3068.     set rtjs 0
  3069.   endif
  3070. endif
  3071. @@GeDF@@FCOM Printing
  3072. use DEAT Printing
  3073. @@GeDF@@GRAD Printing
  3074. use DEAT Printing
  3075. @@GeDF@@IMMI Printing
  3076. use DEAT Printing
  3077. @@GeDF@@MARB Printing
  3078. use DEAT Printing
  3079. @@GeDF@@MARC Printing
  3080. use DEAT Printing
  3081. @@GeDF@@MARL Printing
  3082. use DEAT Printing
  3083. @@GeDF@@MARR Printing
  3084. use DEAT Printing
  3085. @@GeDF@@MARS Printing
  3086. use DEAT Printing
  3087. @@GeDF@@PROB Printing
  3088. use DEAT Printing
  3089. @@GeDF@@RETI Printing
  3090. use DEAT Printing
  3091. @@GeDF@@SUBM Printing
  3092. ! label on current line
  3093. newline
  3094. style label
  3095. text Submitter:
  3096. tabwidth 2
  3097.  
  3098. ! edit the date
  3099. hskip 5
  3100. get *valu.NAME
  3101. style static w=-1
  3102. text *it
  3103. @@GeDF@@ADOP Printing
  3104. get *msg
  3105. if noline
  3106.   newline
  3107.   style label tw=2 j=right
  3108.   text Adopted By:
  3109.  
  3110.   hskip 5
  3111.   style editvalue w=-1
  3112.  
  3113. else
  3114.   ! New line and enter label
  3115.   hrule 2
  3116.   newline 2
  3117.   style label
  3118.   text *name
  3119.   text :
  3120.   get *name
  3121.   if Death
  3122.     tabwidth 1
  3123.   else
  3124.     tabwidth 2
  3125.     hskip 5
  3126.     style editvalue w=-1
  3127.     newline
  3128.     if more
  3129.       tab 1
  3130.     endif
  3131.   endif
  3132.  
  3133.   ! show date and place
  3134.   set rtjs 1
  3135.   showall DATE
  3136.   showall AGE
  3137.   showall PLAC
  3138.   showall ADDR
  3139.   showall TYPE
  3140.   showall AGNC
  3141.   showall CAUS
  3142.   showall NOTE *name
  3143.   showall SOUR *name
  3144.   set rtjs 0
  3145.  
  3146. endif
  3147. @@GeDF@@ANUL Printing
  3148. use DEAT Printing
  3149. @@GeDF@@CHR Printing
  3150. use DEAT Printing
  3151. @@GeDF@@HUSB Printing
  3152. ! label on current line
  3153. newline
  3154. style label tw=2
  3155. ifhastags AGE
  3156.   justify right
  3157.   text Husband’s Age:
  3158.   hskip 5
  3159.   style static w=-1
  3160.   text *AGE
  3161.   HideExcess
  3162. else
  3163.   text Husband:
  3164.   Red
  3165.  
  3166.   ! display name
  3167.   hskip 5
  3168.   style static w=-1
  3169.   get *valu.NAME
  3170.   ifNotEmpty
  3171.     Text *it
  3172.   else
  3173.     Text <unknown>
  3174.   endif
  3175.   Red
  3176. endif
  3177. @@GeDF@@WIFE Printing
  3178. ! label on current line
  3179. newline
  3180. style label tw=2
  3181. ifhastags AGE
  3182.   justify right
  3183.   text Wife’s Age:
  3184.   hskip 5
  3185.   style static w=-1
  3186.   text *AGE
  3187.   HideExcess
  3188. else
  3189.   text Wife:
  3190.   Red
  3191.  
  3192.   ! display name
  3193.   hskip 5
  3194.   style static w=-1
  3195.   get *valu.NAME
  3196.   ifNotEmpty
  3197.     Text *it
  3198.   else
  3199.     Text <unknown>
  3200.   endif
  3201.   Red
  3202. endif
  3203. @@GeDF@@CHIL Printing
  3204. style label
  3205. tabwidth 2
  3206. get *valu.SEX
  3207. if M
  3208.   text Son:
  3209. elseif F
  3210.   text Daughter:
  3211. else
  3212.   text Child:
  3213. endif
  3214.  
  3215. hskip 5
  3216. style static w=-1
  3217. get *valu.NAME
  3218. ifnotempty
  3219.   text *it
  3220. else
  3221.   text <unknown>
  3222. endif
  3223.  
  3224. newline
  3225. style label j=right tw=2
  3226. text Birth:
  3227.  
  3228. hskip 5
  3229. style static w=-1
  3230. text *valu.BIRT.DATE
  3231. get *valu.BIRT.PLAC
  3232. ifnotempty
  3233.   text ", "
  3234.   text *it
  3235. endif
  3236.  
  3237. newline
  3238. style label j=right tw=2
  3239. text Death:
  3240.  
  3241. hskip 5
  3242. style static w=-1
  3243. text *valu.DEAT.DATE
  3244. get *valu.DEAT.PLAC
  3245. ifnotempty
  3246.   text ", "
  3247.   text *it
  3248. endif
  3249.  
  3250. hrule
  3251.  
  3252. @@GeDF@@FAM Record Printing
  3253. bg 0xFF 0xFF 0xFF
  3254. leftskip 0
  3255. lineskip 0
  3256. minlines 1
  3257. settab 72
  3258. settab 110
  3259. pass prhd Family
  3260. show HUSB
  3261. show WIFE
  3262. show MARR
  3263.  
  3264. hrule
  3265. hrule 1
  3266. set topv #vpos
  3267. showall CHIL
  3268. set oldv #vpos
  3269. showall NCHI
  3270. get #vpos
  3271. if #oldv
  3272.   ifnot #topv
  3273.     hrule 1
  3274.   endif
  3275. else
  3276.   hrule
  3277.   hrule 1
  3278. endif
  3279.  
  3280. newline
  3281. style label w=-1 j=center
  3282. text Additional Information
  3283. newline -3
  3284.  
  3285. set oldv #vpos
  3286. showall ENGA
  3287. showall MARB
  3288. showall MARC
  3289. showall MARL
  3290. showall MARS
  3291. showall SLGS
  3292. showall DIV
  3293. showall DIVF
  3294. showall ANUL
  3295. showall CENS
  3296. showall EVEN
  3297.  
  3298. showall OBJE
  3299.  
  3300. ifhastags SOUR
  3301.   hrule
  3302.   hrule 1
  3303.   newline
  3304.   style label w=-1 j=center
  3305.   text Additional Sources
  3306.   hrule
  3307.   showall SOUR
  3308. endif
  3309.  
  3310. ifhastags NOTE
  3311.   hrule
  3312.   hrule 1
  3313.   newline
  3314.   style label w=-1 j=center
  3315.   text Additional Notes
  3316.   hrule
  3317.   showall NOTE
  3318. endif
  3319.  
  3320. if more
  3321.   hrule
  3322.   hrule 1
  3323.   newline
  3324.   style label w=-1 j=center
  3325.   text Miscellaneous Information
  3326.   hrule
  3327. endif
  3328.  
  3329.  
  3330. @@GeDF@@QUAY Editing
  3331. !title
  3332. newline
  3333. style label j=right tw=1
  3334. text Quality:
  3335.  
  3336. ! popup menu
  3337. hskip 5
  3338. style popupedit w=100 b=popbutton f=plain s=9 j=center
  3339. font geneva
  3340. popupitem Unknown:
  3341. popupitem Unreliable:0
  3342. popupitem Questionable:1
  3343. popupitem Secondary:2
  3344. popupitem Primary:3
  3345. help Click to enter quality of this source
  3346. @@GeDF@@RESN Editing
  3347. ifempty *msg
  3348.   newline
  3349.   tab 2
  3350.   hskip 5
  3351. else
  3352.   set hskp #rmgn
  3353.   sub hskp #lmgn
  3354.   sub hskp 47
  3355.   sub hskp #hpos
  3356.   hskip #hskp
  3357. endif
  3358.  
  3359. style button b=1pfield w=28 h=17
  3360. menulink Attach:Restriction
  3361. get *valu
  3362. if locked
  3363.   picture @locked
  3364.   help Record is locked
  3365. elseif privacy
  3366.   picture @private
  3367.   help Record is private
  3368. else
  3369.   picture @unlocked
  3370.   help Record is unlocked
  3371. endif
  3372. help ", click to change"
  3373. cellbg
  3374. @@GeDF@@OBJE Editing
  3375. get *valu
  3376.  
  3377. ! link to embedded MM
  3378. if ValidLink
  3379.   get #hpos
  3380.   if #dlsk
  3381.     Tab 1
  3382.     HSkip 5
  3383.   endif
  3384.   Style button b=3dbutton w=150 j=center
  3385.   Text Encoded Multimedia Object
  3386.   help View multimedia record
  3387.   Link *valu
  3388.   NewLine
  3389.  
  3390.   ! link to file
  3391. elseif TagExists
  3392.   get #hpos
  3393.   if #dlsk
  3394.     Tab 1
  3395.     HSkip 5
  3396.   endif
  3397.   
  3398.   get *FORM
  3399.   if URL
  3400.     Style static w=16 h=16
  3401.     Picture URLLink
  3402.     Hskip 5
  3403.   endif
  3404.  
  3405.   Style button s=12 f=underline
  3406.   get *TITL
  3407.   ifEmpty
  3408.     get *FILE
  3409.   endif
  3410.   Text *it
  3411.   Blue
  3412.   Font Times
  3413.  
  3414.   get *FORM
  3415.   if url
  3416.     Set lwid #rmgn
  3417.     Sub lwid #dlsk
  3418.     Sub lwid #hpos
  3419.     Sub lwid 95
  3420.     Width #lwid
  3421.     URLLink *FILE
  3422.     help Visit web site in your browser
  3423.  
  3424.     ! details button
  3425.     HSkip 5
  3426.     Style button j=center b=3Dbutton w=65
  3427.     ifNot more
  3428.       Text "New "
  3429.     endif
  3430.     Text Details
  3431.     GroupLink urlL *name
  3432.     ShowAll All
  3433.     EndGroup
  3434.     help Web site link details
  3435.   else
  3436.     Width -1
  3437.     Text " ("
  3438.     Text *it
  3439.     Text )
  3440.     StructLink mmOB
  3441.     help View multimedia
  3442.   endif
  3443.   NewLine
  3444.  
  3445.   ! no structure there
  3446. else
  3447.   Style button
  3448.   Picture MMIcon
  3449.   help Add link to multimedia
  3450.   NewLink
  3451.   HSkip 5
  3452. endif
  3453. @@GeDF@@TIME Editing
  3454.  
  3455. @@GeDF@@ALIA Editing
  3456. if tagexists
  3457.   style button s=12 f=underline w=-1
  3458.   get *valu.NAME
  3459.   ifempty
  3460.     get <Unnamed Alias>
  3461.   endif
  3462.   text *it
  3463.   link *valu
  3464.   font times
  3465.   blue
  3466.   help View alias record
  3467. else
  3468.   style button j=center h=22
  3469.   text "Alias"
  3470.   width -6
  3471.   border 3dbutton 4
  3472.   addlink
  3473.   help Link to an alias
  3474.   hskip 5
  3475. endif
  3476. @@GeDF@@ASSO Editing
  3477.  if tagexists
  3478.   style button s=12 w=-1 f=underline
  3479.   get *valu.NAME
  3480.   ifempty
  3481.     get <Unnamed Association>
  3482.   endif
  3483.   text *it
  3484.   link *valu
  3485.   font times
  3486.   blue
  3487.   help View associated individual
  3488.  
  3489.   newline
  3490.   set olds #lmgn
  3491.   leftskip #dlmg
  3492.   cleartabs
  3493.   settab 100
  3494.   settab 165
  3495.   show RELA
  3496.   showall SOUR
  3497.   showall NOTE
  3498.   leftskip #olds
  3499.   newline
  3500. else
  3501.   style button j=center h=22
  3502.   text "Association"
  3503.   width -6
  3504.   border 3dbutton 4
  3505.   addlink
  3506.   help Link to an associated individual
  3507.   hskip 5
  3508. endif
  3509. @@GeDF@@RELA Editing
  3510. style label j=right tw=2
  3511. text Relationship:
  3512.  
  3513. ! edit the relation
  3514. hskip 5
  3515. style editvalue w=-1 b=1pfield
  3516. @@GeDF@@CHRA Editing
  3517. use evnt Editing
  3518. @@GeDF@@CHRA Printing
  3519. use DEAT Printing
  3520. @@GeDF@@iEVT Record Editing
  3521. settab 80
  3522. settab 80
  3523. settab 100
  3524.  
  3525. toolbg 65535 52428 46530
  3526. newline 1
  3527. style label w=-1
  3528. get *name
  3529. ifempty
  3530.   get *valu
  3531. endif
  3532. text *it
  3533. get *rec
  3534. if INDI
  3535.   text " of "
  3536.   text *this.NAME
  3537. else
  3538.   text " for "
  3539.   get *this.HUSB.NAME
  3540.   ifempty
  3541.     get ?
  3542.   endif
  3543.   text *it
  3544.   text " and "
  3545.   get *this.WIFE.NAME
  3546.   ifempty
  3547.     get ?
  3548.   endif
  3549.   text *it
  3550. endif
  3551. endtoolbar 1
  3552. newline 1
  3553.  
  3554. ! show date and place
  3555. get *name
  3556. if Residence
  3557.   show DATE
  3558. endif
  3559. show PLAC
  3560. get *rec
  3561. if FAM
  3562.   showall AGE full
  3563. else
  3564.   show AGE full
  3565. endif
  3566. show TYPE
  3567. show ADDR *name
  3568. get *name
  3569. if Residence
  3570.   cleartabs
  3571.   settab 80
  3572.   settab 100
  3573.   show PHON
  3574.   cleartabs
  3575.   settab 80
  3576.   settab 80
  3577.   settab 100
  3578. endif
  3579. show CAUS
  3580. show AGNC
  3581. get *rec
  3582. if FAM
  3583.   show HUSB
  3584.   show WIFE
  3585. endif
  3586.  
  3587. !Multimedia
  3588. ifhastags OBJE
  3589.   newline
  3590.   style label tw=2 j=right
  3591.   text Multimedia:
  3592.   hskip 5
  3593.   showall OBJE
  3594. endif
  3595.  
  3596. ! Show sources
  3597. lineskip 0
  3598. ifhastags SOUR
  3599.   newline -1
  3600.   style label tw=2 j=right
  3601.   text Sources:
  3602.   hskip 5
  3603.   leftskip #hpos
  3604.   showall SOUR
  3605.   leftSkip #dlmg
  3606. endif
  3607.  
  3608. ! Show notes
  3609. ifhastags NOTE
  3610.   newline
  3611.   style label tw=2 j=right
  3612.   text Notes:
  3613.   hskip 5
  3614.   leftskip #hpos
  3615.   showall NOTE
  3616.   leftSkip #dlmg
  3617. endif
  3618.  
  3619. newline
  3620. lineskip #dlsk
  3621. style label j=right tw=2
  3622. text Attach:
  3623. hskip 5
  3624. show SOUR *valu
  3625. show NOTE *valu
  3626. show OBJE
  3627.  
  3628. @@GeDF@@AGE Editing
  3629. get *msg
  3630. ifempty
  3631.   hskip 5
  3632.   style label j=right w=33
  3633.   text Age:
  3634.  
  3635.   hskip 2
  3636.  
  3637. elseif full
  3638.   style label tw=2 j=right
  3639.   text Age:
  3640.  
  3641.   hskip 5
  3642.  
  3643. else
  3644.   style label tw=3 j=right
  3645.   text *msg
  3646.  
  3647.   hskip 5
  3648. endif
  3649.  
  3650. ! edit the date
  3651. style editvalue b=1pfield w=-1
  3652. newline
  3653. @@GeDF@@NOTE Record Printing
  3654. style edittext
  3655. showall SOUR Notes
  3656. showall CHAN NOTE
  3657. @@GeDF@@ANCI Printing
  3658. ! static text with level and tab
  3659. newline
  3660. style label
  3661. text Ancestor Interest:
  3662. tabwidth 2
  3663.  
  3664. ! edit field with value
  3665. hskip 5
  3666. style static w=-1
  3667. text *valu.NAME
  3668. newline
  3669. @@GeDF@@DESI Printing
  3670. ! static text with level and tab
  3671. newline
  3672. style label
  3673. text Descend. Interest:
  3674. tabwidth 2
  3675.  
  3676. ! edit field with value
  3677. hskip 5
  3678. style static w=-1
  3679. text *valu.NAME
  3680. newline
  3681. @@GeDF@@ALIA Printing
  3682. ! static text with level and tab
  3683. hrule 2
  3684. newline 2
  3685. style label
  3686. text Alias:
  3687. tabwidth 2
  3688.  
  3689. ! edit field with value
  3690. hskip 5
  3691. style static w=-1
  3692. get *valu.NAME
  3693. ifempty
  3694.   get <Unnamed Alias>
  3695. endif
  3696. text *it
  3697. newline
  3698. @@GeDF@@ASSO Printing
  3699. ! static text with level and tab
  3700. hrule 2
  3701. newline 2
  3702. style label
  3703. text Association:
  3704. tabwidth 2
  3705.  
  3706. ! edit field with value
  3707. hskip 5
  3708. style static w=-1
  3709. get *valu.NAME
  3710. ifempty
  3711.   get <Unnamed Association>
  3712. endif
  3713. text *it
  3714. newline
  3715.  
  3716. set rtjs 1
  3717. showall TYPE
  3718. showall RELA
  3719. showall SOUR Association
  3720. showall NOTE Association
  3721. set rtjs 0
  3722. @@GeDF@@CHAN Printing
  3723. newline
  3724. style label
  3725. tabwidth 2
  3726. get *msg
  3727. if NOTE
  3728.   text Notes Changed:
  3729.   justify right
  3730. else
  3731.   text Record Changed:
  3732. endif
  3733. hskip 5
  3734. style static w=-1
  3735. text *DATE
  3736. get *DATE.TIME
  3737. ifnotempty
  3738.   text ", "
  3739.   text *it
  3740. endif
  3741. HideExcess
  3742. @@GeDF@@ADDR Printing
  3743. ! parent family button
  3744. newline
  3745. style label
  3746. text Address:
  3747. get #rtjs
  3748. if 1
  3749.   justify right
  3750. endif
  3751. tabwidth 2
  3752.  
  3753. hskip 5
  3754. style edittext w=-1
  3755. @@GeDF@@RESI Editing
  3756. get #hder
  3757. if 0
  3758.   set hder 1
  3759.   pass aHDR
  3760. endif
  3761.  
  3762. ! static text with level and tab
  3763. newline
  3764. tab 1
  3765. style label j=center tw=1 b=1pfield f=plain
  3766. text Residence
  3767. help Type of attribute
  3768.  
  3769. ! edit field with value
  3770. hskip 3
  3771. style button b=1pfield tw=1 f=underline s=12
  3772. help Click to view and edit address
  3773. font times
  3774. blue
  3775. get *ADDR
  3776. ifempty
  3777.   text Show Residence
  3778. else
  3779.   text *it
  3780. endif
  3781. structlink iEVT
  3782. newline
  3783. @@GeDF@@CONL Editing
  3784. use ldso Editing
  3785. @@GeDF@@lEVT Record Editing
  3786. settab 72
  3787. settab 72
  3788.  
  3789. toolbg 65535 52428 46530
  3790. newline 1
  3791. style label w=-1
  3792. text *valu
  3793. get *rec
  3794. if INDI
  3795.   text " of "
  3796.   text *this.NAME
  3797. else
  3798.   text " for "
  3799.   get *this.HUSB.NAME
  3800.   ifempty
  3801.     get ?
  3802.   endif
  3803.   text *it
  3804.   text " and "
  3805.   get *this.WIFE.NAME
  3806.   ifempty
  3807.     get ?
  3808.   endif
  3809.   text *it
  3810. endif
  3811. endtoolbar 1
  3812. newline 1
  3813.  
  3814. ! show date and place
  3815. show PLAC
  3816. show STAT
  3817. show TEMP
  3818.  
  3819. ! Show sources
  3820. lineskip 0
  3821. ifhastags SOUR
  3822.   newline -1
  3823.   style label tw=2 j=right
  3824.   text Sources:
  3825.   hskip 5
  3826.   leftskip #hpos
  3827.   showall SOUR
  3828.   leftSkip #dlmg
  3829. endif
  3830.  
  3831. ! Show notes
  3832. ifhastags NOTE
  3833.   newline
  3834.   style label tw=2 j=right
  3835.   text Notes:
  3836.   hskip 5
  3837.   leftskip #hpos
  3838.   showall NOTE
  3839.   leftSkip #dlmg
  3840. endif
  3841.  
  3842. newline
  3843. lineskip #dlsk
  3844. style label j=right tw=2
  3845. text Attach:
  3846. hskip 5
  3847. show SOUR *valu
  3848. show NOTE *valu
  3849.  
  3850. @@GeDF@@BAPL Editing
  3851. use ldso Editing
  3852. @@GeDF@@ENDL Editing
  3853. use ldso Editing
  3854. @@GeDF@@SLGC Editing
  3855. use ldso Editing
  3856. @@GeDF@@CONL Printing
  3857. ! New line and enter label
  3858. hrule 2
  3859. newline 2
  3860. style label
  3861. text *name
  3862. text :
  3863. width -2
  3864. newline
  3865. if more
  3866.   tab 1
  3867. endif
  3868.  
  3869. ! show date and place
  3870. set rtjs 1
  3871. showall DATE
  3872. showall PLAC
  3873. showall STAT
  3874. showall TEMP
  3875. showall NOTE *name
  3876. showall SOUR *name
  3877. set rtjs 0
  3878. @@GeDF@@BAPL Printing
  3879. use CONL Printing
  3880. @@GeDF@@ENDL Printing
  3881. use CONL Printing
  3882. @@GeDF@@SLGC Printing
  3883. use CONL Printing
  3884. @@GeDF@@RESI Printing
  3885. use DEAT Printing
  3886. @@GeDF@@QUAY Printing
  3887. ! static text with level and tab
  3888. newline
  3889. style label j=right tw=2
  3890. text Quality:
  3891.  
  3892. ! edit field with value
  3893. hskip 5
  3894. style static w=-1
  3895. get *valu
  3896. if 0
  3897.   text Unreliable
  3898. elseif 1
  3899.   text Questionable
  3900. elseif 2
  3901.   text Secondary
  3902. elseif 3
  3903.   text Primary
  3904. else
  3905.   text Unknown
  3906. endif
  3907. newline
  3908. @@GeDF@@STAT Editing
  3909. !title
  3910. newline
  3911. style label tw=1 j=right
  3912. text Status:
  3913.  
  3914. ! popup menu
  3915. hskip 5
  3916. style popupedit b=popbutton j=center f=plain s=9 =
  3917.   w=100 h=18
  3918. font geneva
  3919. popupitem {Unspecified}:
  3920. popupitem Child
  3921. popupitem Cleared
  3922. popupitem Completed
  3923. popupitem Infant
  3924. popupitem Qualified
  3925. popupitem Pre-1970
  3926. popupitem Stillborn
  3927. popupitem Submitted
  3928. popupitem Uncleared
  3929. help Click to enter ordinance status
  3930. @@GeDF@@CHAN Editing
  3931. ! static text with level and tab
  3932. get *msg
  3933. ifnot here
  3934.   newline
  3935.   style label tw=2 j=right
  3936.   text Last Changed:
  3937. else
  3938.   style label
  3939.   text Last Changed:
  3940.   width -7
  3941. endif
  3942.  
  3943. ! edit field with value
  3944. hskip 5
  3945. style static
  3946. text *valu
  3947. text *DATE
  3948. get *DATE.TIME
  3949. ifnotempty
  3950.   text ", "
  3951.   text *it
  3952. endif
  3953. width -10
  3954. cellbg 0xD4 0xB4 0xA4
  3955. border frame rtbl
  3956. cellup 30146 15073 10485
  3957.  
  3958. HideExcess
  3959. newline
  3960. @@GeDF@@NCHI Editing
  3961. get *rec
  3962. if FAM
  3963.   hskip 15
  3964.   style label
  3965.   text Number of Children:
  3966.   width -2
  3967.  
  3968.   ! edit field with value
  3969.   hskip 5
  3970.   style editvalue w=30 b=1pfield
  3971.  
  3972. else
  3973.   get #hder
  3974.   if 0
  3975.     set hder 1
  3976.     pass aHDR
  3977.   endif
  3978.  
  3979.   ! static text with level and tab
  3980.   newline
  3981.   tab 1
  3982.   style label tw=1 j=center f=plain b=1pfield
  3983.   get *name
  3984.   text *it
  3985.   help "Type of attribute"
  3986.  
  3987.   ! edit field with value
  3988.   hskip 3
  3989.   style editvalue b=1pfield tw=1
  3990.  
  3991.   ! details button
  3992.   HSkip 4
  3993.   Style button
  3994.   help *name
  3995.   help " details"
  3996.   if more
  3997.     Picture DownIcon
  3998.   else
  3999.     Picture EmptyDownIcon
  4000.   endif
  4001.   GroupLink iATT *name
  4002.     showall All
  4003.   endgroup
  4004.  
  4005. endif
  4006. @@GeDF@@SLGS Editing
  4007. use ldso Editing
  4008. @@GeDF@@SLGS Printing
  4009. use CONL Printing
  4010. @@GeDF@@REPO Record Printing
  4011. bg 0xFF 0xFF 0xFF
  4012. leftskip 0
  4013. lineskip 0
  4014. minlines 1
  4015. settab 72
  4016. settab 110
  4017. pass prhd Repository
  4018.  
  4019. show NAME
  4020. showall ADDR
  4021. showall PHON
  4022. hrule
  4023. showall NOTE
  4024.  
  4025. if more
  4026.   hrule 1
  4027. endif
  4028. @@GeDF@@PLAC Editing
  4029. NewLine
  4030. Style label
  4031. get *rec
  4032. ! static text with level and tab
  4033. if HEAD
  4034.   ClearTabs
  4035.   SetTab #tab2
  4036.   Text "    Default Place Hierarchy"
  4037.   Width -1
  4038.   NewLine -2
  4039.   SetTab 40
  4040.   SetTab #tab1
  4041.   Show FORM
  4042. else
  4043.   Text Place:
  4044.   TabWidth 2
  4045.   Justify right
  4046.  
  4047.   ! edit field with value
  4048.   HSkip 5
  4049.   Style editvalue b=1pfield w=-1
  4050.   NewLine
  4051. endif
  4052. @@GeDF@@BLOB Editing
  4053. newline
  4054. tab 1
  4055. hskip 5
  4056.  
  4057. style button w=150 j=center b=3dbutton
  4058. text View Encoded Data
  4059. structlink rawD
  4060. @@GeDF@@SUBM Record Printing
  4061. bg 0xFF 0xFF 0xFF
  4062. leftskip 0
  4063. lineskip 0
  4064. minlines 1
  4065. settab 85
  4066. settab 130
  4067. pass prhd Submitter
  4068.  
  4069. show NAME
  4070. show ADDR
  4071. showall PHON
  4072. showall LANG
  4073.  
  4074. showall OBJE
  4075.  
  4076. if more
  4077.   3dhrule 3
  4078. endif
  4079. @@GeDF@@SUBN Record Printing
  4080. bg 0xFF 0xFF 0xFF
  4081. leftskip 0
  4082. lineskip 0
  4083. minlines 1
  4084. settab 85
  4085. settab 145
  4086. pass prhd Submission
  4087.  
  4088. show SUBM
  4089. show FAMF
  4090. show TEMP
  4091. show ANCE
  4092. show DESC
  4093. show ORDI
  4094. @@GeDF@@HEAD Record Printing
  4095. bg 0xFF 0xFF 0xFF
  4096. leftskip 0
  4097. lineskip 0
  4098. minlines 1
  4099. settab 72
  4100. settab 120
  4101. pass prhd Header
  4102.  
  4103. show SOUR
  4104. 3dhrule
  4105. show SUBM
  4106. show SUBN
  4107. showall _HME
  4108. 3dhrule
  4109. show DEST
  4110. show DATE
  4111. show FILE
  4112. show COPR
  4113. show GEDC
  4114. show CHAR
  4115. show LANG
  4116. show PLAC
  4117. 3dhrule
  4118. show NOTE Header
  4119. showall NOTE Header
  4120. @@GeDF@@SUBN Printing
  4121.  
  4122. @@GeDF@@GEDC Printing
  4123. showall VERS "GEDCOM "
  4124. showall FORM
  4125. @@GeDF@@VERS Printing
  4126. NewLine
  4127. Style label
  4128. Text *msg
  4129. Text Version:
  4130. get #rtjs
  4131. if 1
  4132.   Justify right
  4133. endif
  4134. TabWidth 2
  4135.  
  4136. HSkip 5
  4137. Style editvalue w=-1
  4138. @@GeDF@@PLAC Printing
  4139. get *rec
  4140. if HEAD
  4141.   style label w=-1
  4142.   text Default Place Hierarchy
  4143.  
  4144. else
  4145.   newline
  4146.   style label tw=2
  4147.   text Place:
  4148.   get #rtjs
  4149.   if 1
  4150.     justify right
  4151.   endif
  4152.  
  4153.   hskip 5
  4154.   style editvalue w=-1
  4155. endif
  4156. @@GeDF@@SOUR Record Printing
  4157. bg 0xFF 0xFF 0xFF
  4158. leftskip 0
  4159. lineskip 0
  4160. minlines 1
  4161. settab 72
  4162. settab 110
  4163. pass prhd Source
  4164.  
  4165. show TITL Source
  4166. show AUTH
  4167. showall ABBR
  4168. showall PUBL
  4169. showall REPO
  4170.  
  4171. showall DATA
  4172.  
  4173. hrule
  4174. showall TEXT
  4175. ifhastags NOTE
  4176.   hrule
  4177.   showall NOTE
  4178. endif
  4179. showall OBJE
  4180.  
  4181. if more
  4182.   hrule 3
  4183. endif
  4184. @@GeDF@@AUTH Printing
  4185. newline
  4186. style label
  4187. text Author:
  4188. tabwidth 2
  4189.  
  4190. hskip 5
  4191. style edittext w=-1
  4192. @@GeDF@@TITL Printing
  4193. get *rec
  4194. if SOUR
  4195.   newline
  4196.   style label
  4197.   text Title:
  4198.   tabwidth 2
  4199.   Red
  4200.  
  4201.   hskip 5
  4202.   style edittext w=-1
  4203.   Red
  4204.  
  4205. else
  4206.   ! New line and enter label
  4207.   hrule 2
  4208.   newline 2
  4209.   style label
  4210.   text *name
  4211.   text :
  4212.   get *name
  4213.   if Death
  4214.     tabwidth 1
  4215.   else
  4216.     tabwidth 2
  4217.     hskip 5
  4218.     style editvalue w=-1
  4219.     newline
  4220.     if more
  4221.       tab 1
  4222.     endif
  4223.   endif
  4224.  
  4225.   ! show date and place
  4226.   set rtjs 1
  4227.   showall DATE
  4228.   showall AGE
  4229.   showall PLAC
  4230.   showall ADDR
  4231.   showall TYPE
  4232.   showall AGNC
  4233.   showall CAUS
  4234.   showall NOTE *name
  4235.   showall SOUR *name
  4236.   set rtjs 0
  4237. endif
  4238. @@GeDF@@PUBL Printing
  4239. newline
  4240. style label tw=2
  4241. text Publisher:
  4242.  
  4243. hskip 5
  4244. style edittext w=-1
  4245. @@GeDF@@REPO Printing
  4246. ! label on current line
  4247. newline
  4248. style label
  4249. text Repository:
  4250. tabwidth 2
  4251.  
  4252. ! edit the date
  4253. hskip 5
  4254. get *valu.NAME
  4255. style static w=-1
  4256. text *it
  4257.  
  4258. set rtjs 1
  4259. showall CALN
  4260. showall NOTE Repository
  4261. set rtjs 0
  4262. @@GeDF@@mmOB Record Editing
  4263. settab 72
  4264. settab 72
  4265.  
  4266. toolbg 65535 52428 46530
  4267. style label w=200
  4268. text "Multimedia File Link"
  4269.  
  4270. set blef #rmgn
  4271. sub blef #lmgn
  4272. sub blef 100
  4273. HMoveTo #blef
  4274. style button w=100 b=3dbutton j=center
  4275. text "Change File Link"
  4276. NewLink
  4277.  
  4278. show TITL mm
  4279.  
  4280. newline
  4281. style label j=right tw=1
  4282. text File:
  4283.  
  4284. hskip 5
  4285. style static w=-1
  4286. text *FILE
  4287. setmmform *FORM
  4288.  
  4289. newline
  4290. style label j=right tw=1
  4291. text Format:
  4292.  
  4293. show FORM mm
  4294.  
  4295. newline
  4296. leftskip #dlmg
  4297. showAll NOTE
  4298. newline
  4299. style label tw=1 j=right
  4300. text Attach:
  4301. hskip 5
  4302. show NOTE
  4303.  
  4304. endtoolbar
  4305.  
  4306. style static b=1pfield
  4307. showmm *FILE
  4308. cellbg 0xFF 0xFF 0xFF
  4309. set cwid #picw
  4310. add cwid 4
  4311. width #cwid
  4312. set cwid #pich
  4313. add cwid 4
  4314. height #cwid
  4315.  
  4316. HideExcess
  4317. ZoomWindow
  4318. @@GeDF@@rawD Record Editing
  4319. style edittext s=9
  4320. font monaco
  4321. @@GeDF@@OBJE Printing
  4322. get *valu
  4323. ifNot ValidLink
  4324.   HRule 2
  4325.   NewLine 2
  4326.   Style label
  4327.   TabWidth 2
  4328.   Text Multimedia File:
  4329.  
  4330.   HSkip 5
  4331.   Style static w=-1
  4332.   get *TITL
  4333.   ifEmpty
  4334.     get *FILE
  4335.   endif
  4336.   Text *it
  4337.   Text " ("
  4338.   Text *FORM
  4339.   Text )
  4340.   NewLine
  4341.  
  4342.   Tab 2
  4343.   HSkip 5
  4344.   Style static w=-1
  4345.   Text *FILE
  4346.   NewLine
  4347.  
  4348.   get *FORM
  4349.   ifNot URL
  4350.     Tab 2
  4351.     HSkip 5
  4352.     SetMMForm *FORM
  4353.     Style static b=field
  4354.     ShowMM *FILE
  4355.     Set cwid #picw
  4356.     Add cwid 4
  4357.     Width #cwid
  4358.     Set cwid #pich
  4359.     Add cwid 4
  4360.     Height #cwid
  4361.   endif
  4362.  
  4363. endif
  4364.  
  4365. HideExcess
  4366. @@GeDF@@FORM Editing
  4367. get *msg
  4368. if mm
  4369.   hskip 5
  4370.   style editvalue w=50 b=1pfield
  4371. else
  4372.   newline
  4373.   set levl *lev
  4374.   style label j=right tw=#levl
  4375.   text Form:
  4376.  
  4377.   ! edit field with value
  4378.   hskip 5
  4379.   style editvalue w=-1 b=1pfield
  4380. endif
  4381. @@GeDF@@PEDI Editing
  4382. ! popup menu
  4383. style popupedit w=60 b=popbutton j=center s=9 h=16
  4384. popupitem Birth:
  4385. popupitem Adopted:adopted
  4386. popupitem Foster:foster
  4387. popupitem Sealing:sealing
  4388. font geneva
  4389. help Click to change pedigree
  4390. @@GeDF@@REFN Editing
  4391. ! static text with level and tab
  4392. NewLine
  4393. Style label tw=2 j=right
  4394. get *TYPE
  4395. ifnotempty
  4396.   Text *it
  4397.   Text :
  4398. else
  4399.   Text User Ref. ID:
  4400. endif
  4401.  
  4402. ! edit field with value
  4403. HSkip 5
  4404. Style editvalue b=1pfield w=-1
  4405.  
  4406. HideExcess
  4407. @@GeDF@@CALN Editing
  4408. newline
  4409. style label j=right tw=2
  4410. text Call Number:
  4411. hskip 5
  4412.  
  4413. style editvalue w=-1 b=1pfield
  4414.  
  4415. show MEDI
  4416. @@GeDF@@bdEX Record Editing
  4417. SetTab 80
  4418. SetTab 80
  4419. SetTab 95
  4420.  
  4421. ToolBg 65535 52428 46530
  4422. NewLine 1
  4423. HSkip 5
  4424. Style label w=-1
  4425. Text *valu
  4426. get *rec
  4427. if INDI
  4428.   Text " details for "
  4429.   Text *this.NAME
  4430. else
  4431.   Text " details for "
  4432.   get *this.HUSB.NAME
  4433.   ifEmpty
  4434.     Text ?
  4435.   else
  4436.     Text *it
  4437.   endif
  4438.   Text " and "
  4439.   get *this.WIFE.NAME
  4440.   ifEmpty
  4441.     Text ?
  4442.   else
  4443.     Text *it
  4444.   endif
  4445. endif
  4446. EndToolbar 1
  4447. NewLine 1
  4448.  
  4449. ! show date and place
  4450. get *valu
  4451. if Birth
  4452.   Show TYPE
  4453.   Show ADDR
  4454.   Show AGNC
  4455. else
  4456.   get *rec
  4457.   if INDI
  4458.     Show AGE full
  4459.   endif
  4460.   Show TYPE
  4461.   Show ADDR
  4462.   Show CAUS
  4463.   Show AGNC
  4464.   get *rec
  4465.   if FAM
  4466.     ShowAll AGE full
  4467.     Show HUSB
  4468.     Show WIFE
  4469.   endif
  4470. endif
  4471.  
  4472. !Multimedia
  4473. ifHasTags OBJE
  4474.   NewLine
  4475.   Style label tw=2 j=right
  4476.   Text Multimedia:
  4477.   HSkip 5
  4478.   ShowAll OBJE
  4479. endif
  4480.  
  4481. ! Show sources
  4482. LineSkip 0
  4483. ifHasTags SOUR
  4484.   NewLine
  4485.   Style label tw=2 j=right
  4486.   Text Sources:
  4487.   HSkip 5
  4488.   LeftSkip #hpos
  4489.   ShowAll SOUR
  4490.   LeftSkip #dlmg
  4491. endif
  4492.  
  4493. ! Show notes
  4494. ifHasTags NOTE
  4495.   NewLine
  4496.   Style label tw=2 j=right
  4497.   Text Notes:
  4498.   HSkip 5
  4499.   LeftSkip #hpos
  4500.   ShowAll NOTE
  4501.   LeftSkip #dlmg
  4502. endif
  4503.  
  4504. NewLine
  4505. LineSkip #dlsk
  4506. Style label j=right tw=2
  4507. Text Attach:
  4508. HSkip 5
  4509. Show SOUR *valu
  4510. Show NOTE *valu
  4511. Show OBJE
  4512. @@GeDF@@eNOT Record Editing
  4513. toolbg 65535 52428 46530
  4514. pass Nlab
  4515. newline -4
  4516. style edittext
  4517. @@GeDF@@Nlab Editing
  4518. style label w=-1
  4519. get *rec
  4520. if HEAD
  4521.   text "Header Notes"
  4522. elseif FAM
  4523.   text "Notes on "
  4524.   get *this.HUSB.NAME
  4525.   ifempty
  4526.     get ?
  4527.   endif
  4528.   text *it
  4529.   text " / "
  4530.   get *this.WIFE.NAME
  4531.   ifempty
  4532.     get ?
  4533.   endif
  4534.   text *it
  4535.   text " Family"
  4536. elseif SOUR
  4537.   get *msg
  4538.   ifempty
  4539.     text "Notes on "
  4540.   else
  4541.     text *msg
  4542.   endif
  4543.   get *this.ABBR
  4544.   ifempty
  4545.     get *this.TITL
  4546.     ifempty
  4547.       get <Unnamed Source>
  4548.     endif
  4549.   endif
  4550.   text *it
  4551. else
  4552.   text "Notes on "
  4553.   get *this.NAME
  4554.   ifempty
  4555.     get <Unnamed Record>
  4556.   endif
  4557.   text *it
  4558. endif
  4559. @@GeDF@@OCCU Editing
  4560. use attr Editing
  4561. @@GeDF@@iATT Record Editing
  4562. settab 80
  4563. settab 80
  4564.  
  4565. toolbg 65535 52428 46530
  4566. newline 1
  4567. style label w=-1
  4568. text "Details on "
  4569. text *valu
  4570. text " of "
  4571. text *this.NAME
  4572. endtoolbar 1
  4573. newline 1
  4574.  
  4575. ! show date and place
  4576. show DATE
  4577. show AGE full
  4578. show PLAC
  4579. show TYPE
  4580. show ADDR
  4581. show CAUS
  4582. show AGNC
  4583.  
  4584. !Multimedia
  4585. ifhastags OBJE
  4586.   newline
  4587.   style label tw=2 j=right
  4588.   text Multimedia:
  4589.   hskip 5
  4590.   showall OBJE
  4591. endif
  4592.  
  4593. ! Show sources
  4594. lineskip 0
  4595. ifhastags SOUR
  4596.   newline -1
  4597.   style label tw=2 j=right
  4598.   text Sources:
  4599.   hskip 5
  4600.   leftskip #hpos
  4601.   showall SOUR
  4602.   leftSkip #dlmg
  4603. endif
  4604.  
  4605. ! Show notes
  4606. ifhastags NOTE
  4607.   newline
  4608.   style label tw=2 j=right
  4609.   text Notes:
  4610.   hskip 5
  4611.   leftskip #hpos
  4612.   showall NOTE
  4613.   leftSkip #dlmg
  4614. endif
  4615.  
  4616. newline
  4617. lineskip #dlsk
  4618. style label j=right tw=2
  4619. text Attach:
  4620. hskip 5
  4621. show SOUR *name
  4622. show NOTE *name
  4623. show OBJE
  4624.  
  4625. @@GeDF@@CAST Editing
  4626. use attr Editing
  4627. @@GeDF@@DSCR Editing
  4628. use attr Editing
  4629. @@GeDF@@EDUC Editing
  4630. use attr Editing
  4631. @@GeDF@@IDNO Editing
  4632. use attr Editing
  4633. @@GeDF@@NATI Editing
  4634. use attr Editing
  4635. @@GeDF@@NMR Editing
  4636. use attr Editing
  4637. @@GeDF@@PROP Editing
  4638. use attr Editing
  4639. @@GeDF@@RELI Editing
  4640. use attr Editing
  4641. @@GeDF@@SSN Editing
  4642. use attr Editing
  4643. @@GeDF@@OCCU Printing
  4644. use DEAT Printing
  4645. @@GeDF@@EDUC Printing
  4646. use OCCU Printing
  4647. @@GeDF@@DSCR Printing
  4648. use OCCU Printing
  4649. @@GeDF@@RELI Printing
  4650. use OCCU Printing
  4651. @@GeDF@@SSN Printing
  4652. use OCCU Printing
  4653. @@GeDF@@IDNO Printing
  4654. use OCCU Printing
  4655. @@GeDF@@PROP Printing
  4656. use OCCU Printing
  4657. @@GeDF@@CAST Printing
  4658. use OCCU Printing
  4659. @@GeDF@@NCHI Printing
  4660. get *rec
  4661. if FAM
  4662.   ! static text with level and tab
  4663.   hskip 15
  4664.   style label
  4665.   text *name
  4666.   text :
  4667.   tabwidth 2
  4668.  
  4669.   ! edit field with value
  4670.   hskip 5
  4671.   style editvalue w=-1
  4672.   newline
  4673.  
  4674. else
  4675.   ! New line and enter label
  4676.   hrule 2
  4677.   newline 2
  4678.   style label
  4679.   text *name
  4680.   text :
  4681.   width -1
  4682.   newline
  4683.   if more
  4684.     tab 1
  4685.   endif
  4686.  
  4687.   ! show date and place
  4688.   set rtjs 1
  4689.   showall DATE
  4690.   showall AGE
  4691.   showall PLAC
  4692.   showall ADDR
  4693.   showall TYPE
  4694.   showall AGNC
  4695.   showall CAUS
  4696.   showall NOTE *name
  4697.   showall SOUR *name
  4698.   set rtjs 0
  4699. endif
  4700. @@GeDF@@NMR Printing
  4701. use OCCU Printing
  4702. @@GeDF@@NATI Printing
  4703. use OCCU Printing
  4704. @@GeDF@@REFN Printing
  4705. ! static text with level and tab
  4706. newline
  4707. style label tw=2
  4708. text *name
  4709. text :
  4710.  
  4711. ! edit field with value
  4712. hskip 5
  4713. style editvalue w=-1
  4714.  
  4715. set rtjs 1
  4716. showall TYPE
  4717. set rtjs 0
  4718. @@GeDF@@gmen Editing
  4719. set bicn #rmgn
  4720. sub bicn #lmgn
  4721. sub bicn 100
  4722. HMoveTo #bicn
  4723.  
  4724. icon Back Go:Back
  4725. help Go back
  4726.  
  4727. hskip 2
  4728. icon Prev Go:Prev
  4729. help "Previous "
  4730. help *rec
  4731. help " record"
  4732.  
  4733. hskip -1
  4734. icon Next Go:Next
  4735. help "Next "
  4736. help *rec
  4737. help " record"
  4738.  
  4739. hskip 2
  4740. icon Home Go:Home
  4741. help Go to home record
  4742. @@GeDF@@prhd Printing
  4743. Style static h=2 w=-1
  4744. Border frame tb
  4745. CellUp 0 0 0xD4
  4746.  
  4747. NewLine 6
  4748. hskip 5
  4749. Style static w=10 h=10 b=field
  4750. CellBg 0 0 0xD4
  4751. CellUp 0 0 0xD4
  4752.  
  4753. NewLine -14
  4754. HSkip 18
  4755. Style label w=-1 s=14
  4756. Text *msg
  4757. Text " Record"
  4758. Blue
  4759.  
  4760. NewLine
  4761. Style static h=2 w=-1
  4762. Border frame tb
  4763. CellUp 0 0 0xD4
  4764. newline 3
  4765. @@GeDF@@urlL Record Editing
  4766. settab 72
  4767. settab 72
  4768.  
  4769. style label w=-1
  4770. text "Internet Web Site Link"
  4771.  
  4772. show TITL mm
  4773.  
  4774. newline
  4775. show FILE url
  4776.  
  4777. newline
  4778. style label j=right tw=1
  4779. text Format:
  4780.  
  4781. show FORM mm
  4782.  
  4783. newline
  4784. leftskip #dlmg
  4785. showAll NOTE
  4786. newline
  4787. style label tw=1 j=right
  4788. text "Attach:"
  4789. hskip 5
  4790. show NOTE
  4791.  
  4792. newline
  4793. HideExcess
  4794. ZoomWindow
  4795. @@GeDF@@name Record Editing
  4796. settab 72
  4797. settab 72
  4798.  
  4799. toolbg 65535 52428 46530
  4800. newline 1
  4801. hskip 5
  4802. style label w=-1
  4803.   text "Name details for "
  4804.   text *this.NAME
  4805. endtoolbar 1
  4806. newline 1
  4807.  
  4808. show NPFX
  4809. show GIVN
  4810. show NICK
  4811. show SPFX
  4812. show SURN
  4813. show NSFX
  4814.  
  4815. ! Show sources
  4816. lineskip 0
  4817. ifhastags SOUR
  4818.   newline
  4819.   style label tw=2 j=right
  4820.   text Sources:
  4821.   hskip 5
  4822.   leftskip #hpos
  4823.   showall SOUR
  4824.   leftSkip #dlmg
  4825. endif
  4826.  
  4827. ! Show notes
  4828. ifhastags NOTE
  4829.   newline
  4830.   style label tw=2 j=right
  4831.   text Notes:
  4832.   hskip 5
  4833.   leftskip #hpos
  4834.   showall NOTE
  4835.   leftSkip #dlmg
  4836. endif
  4837.  
  4838. newline
  4839. lineskip #dlsk
  4840. style label tw=2 j=right
  4841. text Attach:
  4842. hskip 5
  4843. show SOUR *valu
  4844. show NOTE *valu
  4845. @@GeDF@@bbox Editing
  4846. leftskip #dlmg
  4847. set ende #vpos
  4848. sub ende #strt
  4849. get #ende
  4850. if 0
  4851.   leftskip #dlmg
  4852.   set mbrk #sbrk
  4853.   mult mbrk -1
  4854.   newline #mbrk
  4855. else
  4856.   MoveTo #strt
  4857.   HMoveTo #dlmg
  4858.   leftskip #dlmg
  4859.   style label j=center tw=1
  4860.   cellbg 0xD4 0xB4 0xA4
  4861.   border frame rtbl
  4862.   cellup 30146 15073 10485
  4863.   height #ende
  4864.   text *msg
  4865. endif
  4866. @@GeDF@@eHDR Editing
  4867. newline 2
  4868. tab 1
  4869. style label tw=1 j=center b=1pfield
  4870. text Event
  4871. cellbg 0xD4 0xB4 0xA4
  4872.  
  4873. hskip 3
  4874. style label b=1pfield tw=1 j=center
  4875. text ?
  4876. cellbg 0xD4 0xB4 0xA4
  4877.  
  4878. hskip 3
  4879. style label b=1pfield tw=1 j=center
  4880. text Date
  4881. cellbg 0xD4 0xB4 0xA4
  4882. @@GeDF@@aHDR Editing
  4883. newline 2
  4884. tab 1
  4885. style label tw=1 j=center b=1pfield
  4886. text Attribute
  4887. cellbg 0xD4 0xB4 0xA4
  4888.  
  4889. hskip 3
  4890. style label b=1pfield tw=1 j=center
  4891. text Description
  4892. cellbg 0xD4 0xB4 0xA4
  4893. @@GeDF@@PHON Editing
  4894. use COPR Editing
  4895. @@GeDF@@cHDR Editing
  4896. newline 3
  4897. lineskip 2
  4898. tab
  4899. hskip 5
  4900. style label tw=1 j=center b=1pfield
  4901. text Children
  4902. cellbg 0xD4 0xB4 0xA4
  4903.  
  4904. hskip 3
  4905. style label b=1pfield w=55 j=center
  4906. text Sex
  4907. cellbg 0xD4 0xB4 0xA4
  4908.  
  4909. hskip 3
  4910. style label b=1pfield w=#dwid j=center
  4911. text Birthdate
  4912. cellbg 0xD4 0xB4 0xA4
  4913.  
  4914. hskip 3
  4915. style label j=center b=1pfield tw=1
  4916. text Link
  4917. cellbg 0xD4 0xB4 0xA4
  4918. @@GeDF@@_HME Editing
  4919. newline
  4920.  
  4921. style label tw=1 j=right
  4922. text Home Record: 
  4923.  
  4924. hskip 5
  4925. style button f=underline s=12 w=-1
  4926. blue
  4927. font times
  4928. text *valu.NAME
  4929. link *valu
  4930. @@GeDF@@text Record Editing
  4931. toolbg 65535 52428 46530
  4932. pass Nlab "Text from "
  4933. newline -4
  4934. style edittext
  4935. @@GeDF@@evnt Editing
  4936. get #hder
  4937. if 0
  4938.   set hder 1
  4939.   pass eHDR
  4940. endif
  4941. newline
  4942. tab 1
  4943. style label f=plain tw=1 b=1pfield j=center
  4944. text *name
  4945. help Type of event
  4946.  
  4947. hskip 2
  4948. style 1pcheckedit w=10
  4949. uncheckedvalue
  4950. help Can check to show event has occurred
  4951.  
  4952. show DATE Event
  4953.  
  4954. hskip 4
  4955. style button w=18
  4956. help *name
  4957. help " details"
  4958. if more
  4959.   picture DownIcon
  4960. else
  4961.   picture EmptyDownIcon
  4962. endif
  4963. GroupLink iEVT *name
  4964.   showAll ALL
  4965. endGroup
  4966. @@GeDF@@ldso Editing
  4967. get #hder
  4968. if 0
  4969.   set hder 1
  4970.   pass eHDR
  4971. endif
  4972. NewLine
  4973. Tab 1
  4974. Style label f=plain tw=1 b=1pfield j=center
  4975. Text *name
  4976. help Type of LDS ordinance
  4977.  
  4978. HSkip 2
  4979. Style 1pcheckedit w=10
  4980. UncheckedValue
  4981. help Can check to show ordinance occurred
  4982.  
  4983. Show DATE Event
  4984.  
  4985. HSkip 4
  4986. Style button w=18
  4987. help *name
  4988. help " details"
  4989. if more
  4990.   Picture DownIcon
  4991. else
  4992.   Picture EmptyDownIcon
  4993. endif
  4994. GroupLink lEVT *name
  4995.   ShowAll ALL
  4996. EndGroup
  4997. @@GeDF@@attr Editing
  4998. get #hder
  4999. if 0
  5000.   set hder 1
  5001.   pass aHDR
  5002. endif
  5003.  
  5004. ! static text with level and tab
  5005. newline
  5006. tab 1
  5007. style label tw=1 j=center b=1pfield f=plain
  5008. get *name
  5009. text *it
  5010. help Type of attribute
  5011.  
  5012. ! edit field with value
  5013. hskip 3
  5014. style editvalue b=1pfield tw=1
  5015.  
  5016. ! details button
  5017. hskip 4
  5018. style button
  5019. help *name
  5020. help " details"
  5021. if more
  5022.   Picture DownIcon
  5023. else
  5024.   Picture EmptyDownIcon
  5025. endif
  5026. GroupLink iATT *name
  5027.   showall All
  5028. endgroup
  5029.  
  5030. @@GeDF@@ficn Editing
  5031. MoveTo 2
  5032. HMoveTo 2
  5033.  
  5034. icon Open File:Open...
  5035. help Open new file
  5036. hskip -1
  5037.  
  5038. icon Save File:Save
  5039. help Save file
  5040.  
  5041. hskip -1
  5042. icon Print File:Print...
  5043. help Print
  5044.  
  5045. hskip -1
  5046. icon Preview File:Print Preview...
  5047. help Print preview
  5048.  
  5049. hskip 2
  5050. icon Search Edit:Search...
  5051. help Search the file
  5052.  
  5053. hskip -1
  5054. icon Index View:Index...
  5055. help Open index window
  5056.  
  5057. @@GeDF@@_HME Printing
  5058. ! label on current line
  5059. newline
  5060. style label
  5061. text Home Record:
  5062. tabwidth 2
  5063.  
  5064. ! edit the date
  5065. hskip 5
  5066. get *valu.NAME
  5067. style static w=-1
  5068. text *it
  5069. @@GeDF@@
  5070. @@GeDF@@Current GEDitCOM Format Editing Help
  5071. .../y./s..Y2ROr6/5KjS.I76y.2ROy......./W..2.SE...Fs..E2p.../C..0
  5072. .Ko...4f..2/kU...fk..k9C...26E.2/0M...NE..E4JE../zo./EUE...8g..2
  5073. 0fI...lM..MAN...2pw.//BY...Kn../3h2../RA..2LIU..4/o..FUh...N.k./
  5074. 4F2../bI..2Nqk..4XA..Fcy...Owk./4jY../iS..APhU..53E..llc...QaU.1
  5075. 59g../pg..ARQE..5O...lqf...S2U./5VQ../uX..ASf...5iM..lvr...TJU.1
  5076. 5qY..0.N..2U5U..68E..m0m...W.E.26UQ..0IV..EZ7U..7oY./WRZ...bok.6
  5077. 7xY..0Td..UbvE..8wE./0j7...itU.19jA..0xa..MjQk..A0s./X.v...kFk.1
  5078. A3I..14Y..EleU..Acc..H8H...nnE./AxQ..1Gz..2okk..BIY..HJB...qVk./
  5079. Bco..1Ro..2rSE..C.E..nUK...tOE.2CKw..1hG..AvN...D9I./1mv...zCk.1
  5080. Doo..1yU..MzgE..Dyo..nzz../.a..4E96..25y..N04E..EVo..Y6o..R0Gk..
  5081. Eb2..I86../1mE.4Exk..2ER..N28E..FJbzzk...86.D..B..c..k....c.....
  5082. ....2k.B..c..k2...c..........U.B..c..kE...c.........2..B..c..k6.
  5083. ..c.........0U.B..c..k....cFK3ur1IA..E.E..k.......k.........0E.B
  5084. ..c..kE...c.....p....E.B..c..kI...c..........U.E..kzzk....k.....
  5085. .....2JM60.U60.UJ4VdQm/cNKlk65FjQ4ZX64RdRaJn64NjQapVR0pnQ4JXOKNd
  5086. Mm/dPaNjQapVR4ZjPW/VMaxpR0/ZN4ZoOKtb62R3F2BDHG/4OKlZQm/rO4Ji65Jn
  5087. OKtb65FcNG/2NKNVRKlo62R3F4ZoEoxB62NjQapVR0sUJ4VdQm/aPr7hMLEUNqZq
  5088. NLAURaZmR5JVP4lt64BjPL/gNLFZ643XMqJnQm/oPm/VP4kUNaJVR5JmNLAUPqMU
  5089. FoJ2EoxB64NdP4Jn9UoU60.U60/CNK3m65FcNG/ZPaEUPqMUR4VdQm/cNKlk65Fj
  5090. Q4ZX64Zn64ZiNaxmPK3oOKxi643WPrJo65/mOKtoOKtb657ZQ4xmR5AURLBdPaQU
  5091. R4VZ62FZNa3pP5EUFoJ2OLF1HooUFaxmPK3o9UoBIr/ZMqZaOKAUFKFdR4ZiNm/7
  5092. PaNjQapVR4ZjPW/aPr6UFK3XO0/ISL/Z64xa637ZMqxmN.oU60.U60/0NLBdN4Jn
  5093. 65FcNG/aPqlgPrRdPaQUO4JgQ0kUPK3iSG/jNW/oO4IUNaJVR5JmNLAUPqMUR4VZ
  5094. 62FZNa3pP5EUFoJ2OLF1HooUFaxmPK3o643mNG/YPqBpPKJiR4JY647t64VZP5.U
  5095. Q4xk9LJk65BoQaZiNrAi623n65ZjRG/hPrNZ65FcNG/hPrJnNG/VQaxpPaEUR4VZ
  5096. 65NVQaZjRLAURqZiN4xrQmkUQqxhNG/cNKlk65FZQrEURqZgP0/VQ5/ZML6UOKsU
  5097. R4VZ64ljRqJm64lZNbEUMqxmPaJm64RdRaZiNm/hPr7Z64ZiNaxmPK3oOKxi643W
  5098. PrJo65NVQaZjRLAUPq7eNKBoQmsUIrJXO0/cNKlk64Zn64pjQrEURLBZNbJg64Nj
  5099. QW/bQa3kO4ZX64JgNKpZPbFn64ldOqIUOKBjPbAi1EqZ62ZCF2ZKGIFJEIkUIaJX
  5100. Pr7YQkoU60.U60/IO4IUOKBjPW/WML6UPqMUNK3XO0/7HYF7JYZ2JI3A637ZMqxm
  5101. N0/bOLNZQm/V65BZQaZZQm/jNW/WRLFoPqtn65FcMLEUQ57jRaZYNG/nO4xmR0/X
  5102. RLFn65Fj64pVPbYUPKJiRG/XPqphMKtY9W/IPm/gNK3mPW/rO43o643iSG/dMqxi
  5103. 64FjNLAg64pjRaIUR4VZ64pjRLBZ64xqNL6UR4VZ647pR5FjPXgUQqxhNG/cNKlk
  5104. 65FZS5EURqZgP0/VQ5/ZML6UOKsUR4VZ64ljRqJm9KlZNbEUMqxmPaJm64xa65Fc
  5105. NG/rOKtYPrQi62Za647pR5FjPbAUML7Z64FdPKpZN0kUOLEUPKJVPbAUR4VZ64Bj
  5106. Qb7ZQr/jPaFdPaQUPKJiRG/dR4Jh64Zn64BpQb7ZPbFgSG/YOLBVMalZN0sB60.U
  5107. 60.UJ4VZ64RmNKJi643mQaxr647pR5FjPbAUR4VVR0/aPqlgPrQUML7Z65Fj6B75
  5108. Pm/0MKBfom/oPm/oO4IUQ57ZRaZjRLBgSG/qOKJrNKEUQaJXPr7Y64xm65Fj65BX
  5109. QaxgP0/oPm/oO4IUoZ/mNLNdPrJnom/jQW1GHaJsRBAUGIt2GJN7F3J/H0/mNKBj
  5110. QaEUOKsUR4VZ64NdP4Ii63FcNG1GG4xhNRAUMbJoR4xi64RjNLAUR4wUR4VZ64Bp
  5111. Qb7ZPbEUO4xhNG/mNKBjQaEi1G.U60.U63FcNG/iNLVo64ldPaIUNqZqNLAUR4VZ
  5112. 65/ZQbBjPhJn64tVPKIg65BZS0kUMG/mNLBoQaZXR4ZjPW/dMqxi60VgPqBfNKEg
  5113. 65JiP4xXOqJY90/jQW/kQaZqMLFZ8GkUMKtY642UQaJXPr7Y9KpVQahZN0/dMqxi
  5114. 9W/NPrIUMq3i64JYOLEUR4VZ64tVPKIUMbYUMqldMqhdPaQUMKtY65FtQ4ZiNmsU
  5115. KKxp64BVPW/ZPbFZQW/hPr7Z64tVPKIUN4JoMKZgQmkUQrJXO0/VQm/V64tdMqhi
  5116. MKpZ90/nPrJmMqIUMqZoMLFdPqtn90/jQW/iPrFZQm/VMaxpR0/oO4IUPa3hNGkU
  5117. MbYUMqldMqhdPaQUR4VZ6B72PrRiom/VQb7jRm/VNbFZQW/oO4IUPa3hNG/aOKJg
  5118. N0sUJ4VZ6072PrRi6W/VQb7jRm/rOKlg647Z64NdP4lZN0/dPW/bQaJZPW/dNW/h
  5119. Pr7Z64ZiNaxmPK3oOKxi64VVQm/WNKJi64JiR4JmNKEUMK7jRLEUR4VZ64tVPKIv
  5120. 64Zo65RdP4kUMaIUNKpkR5YUOKMUPawUNLVoQa2UN43oMG/dQm/VRa3dP43WP4Ii
  5121. 1G.U60.U63ZjRG/XMKsUNKFdR0/oO4IUQqJs64xiP5YUOKMUR4VZ64BpQb7ZPbEU
  5122. OKtYOLNdN5JVP0/dQm/iPrEUR4VZ65BkPrJnNG/dPW/VPbYUFY3BGIlN657ZMqxm
  5123. N0sUJ4wUMqVVPaRZ65FcNG/nNLUg64BgOKBf643iN0/nNKlZMrEUR4VZ64tZRm/n
  5124. NLUURLBdPaQUR4VZ65/jQ0ppQ0/hNKtp9W/7NW/oO4IUMrJmQaJiR0/dPaFdRaZY
  5125. RK3g64Zn642UQr/jRLBZ64Zi642UFY3BGIlN657ZMqxmN0kUR4VZ65BZS0/aOKJg
  5126. N0/rOKlg64dpQrEUQqVjRm/oO4IUQ4JmQqxipLAUQqJs9W/NPrIUMq3i64BcMKtb
  5127. NG/nRKBc642UQ4JmQqxipLAUQqJs647t65JnOKtb65FcNG//R5FVMqUhDYBcMKtb
  5128. NKEUIqJs64BjPKpVPaEU85RcOKBc64BVPW/VP5Bj647Z643XMqJnQqJY647t64Bg
  5129. OKBfOKtb65FcNG/nNLUUNaZZP4Ed9W/IO4IUQaJnR57dMrFdPqsUOKBjPW/rOKlg
  5130. 64ZiN4ZXMLFZQm/dNW/oO4IUQaJXPr7Y64Zn64ljMqhZN0.cMG/XP4xnNKEUP4xX
  5131. OmYUPr6URKtgPqBfNKEU843i64xkNKtZN0/gPqBf8GsUKKxp64BVPW/XP4ZXOm/o
  5132. O4IUOKBjPW/oPm/XO43iNqIUR4VZ64BpQb7ZPbEUQaJnR57dMrFdPqsi63FcNG/a
  5133. OKtVP0/WPrUURqZgP0/WNG/ZPL/oSG/jQW/cMLNZ642UMqVZMqgUPK3mOm/dNW/o
  5134. O4IUMrJmQaJiR0/mNKBjQaEUOLAUPK3mOqJY9W/NPrIUMq3i64BgOKBf65FcNG/W
  5135. PrUUR4wUR4xbNqlZ65FcNG/mNKBjQaEUPK3mOqZiNmsB60.U60.UJ4VZ64tZS5EU
  5136. R5Rj65BZMrFdPqtn64FZQqBmOK7Z65FcOLAUQ4JmQqxipLAUMaZmR4UUMKtY64FZ
  5137. MLFc64JqNKtoQmsUKKxp64BVPW/ZPbFZQW/oO4IUN43oNLAUMKtY65/gMKBZQmsU
  5138. EqldMqhdPaQUR4VZ6B72PrRiom/VQb7jRrAUMKNoNL6UR4VZ64FVR4Jn65RdP4kU
  5139. Pr/ZPW/rOKtYPrRn65RcNL7Z65ZjRG/XMKsUNKtoNL6UPKxmNG/dPaNjQapVR4Zj
  5140. PW/VMaxpR0/oO4IUEaZmR4UUPr6UF4JVR4UUOKtXP5JYOKtb64tjR4Jn643iN0/X
  5141. OLFdPaQUPqMUQqxpQaBZQmsUJ4VZ6072PrRi6W/VQb7jRrAURqZgP0/WNG/aOKlg
  5142. NKEUOKsUNr7ZNKsUOKMUPKxmNG/dPaNjQapVR4ZjPW/cMLAUMaJZPW/ZPbFZQaJY
  5143. 643WPrJo65FcNG/0OL7oO0/jQW/2NK3oO1gUOLEURqZgP0/WNG/ZPL/oSG/dNW/i
  5144. Pm/ZS5FmMG/YMLFV64Zn643qMKZgMK7gNGsB60.U60.UJ4VZ64FZMLFc64ZiNaxm
  5145. PK3oOKxi65BZMrFdPqsUOKtXP5JYNLAUMG/XO4JXOm/WPrUUMq3gP4JY6B76MLAU
  5146. F4ZZN0vH62Za65ZjRG/fPaxr643i64ZiN4ZqOKFpMKkUOLAUN4JVN0kUMbJo65Zj
  5147. RG/cMLNZ64tj64ZiNaxmPK3oOKxi643WPrJo65FcNG/YNK3oO0/ZRaJiR0kUSKxp
  5148. 64BVPW/XO4JXOm/oO4Zn647jS0sUFoJ2OLF1HooURqZgP0/oO4Ji657ZMqxbPaZu
  5149. NG/oO4Zn657ZMqxmN0/VQm/WNKRdPW/aPr6UMG/YNK3Y64ZiN4ZqOKFpMKki63Fc
  5150. NG/YNK3oO0/YMLFZ65RdP4kUMaIUPK3mOqJY65RdR4UUMG1GDxAUOKsUR4VZ62Zi
  5151. N4Js63RdPaFjRm/VPaEUOKsUNa3hOKlt65FmNKJn64BjPbFVOKtdPaQUR4VdQm/d
  5152. PaFdRaZYRK3g9UoU60.U60/0NKljRm/oO4IUN4JVR4UUNLNZPbEURqZgP0/WNG/V
  5153. 64ldQrEUPqMUMKlg64NVPKZgOKJn65FcOLAUOKtYOLNdN5JVP0/WNKljPaRn65Fj
  5154. 9W/IO4IUP4ZnR0/rOKlg64ZiMqlpN4IUMKlg64pVQb7dMKRZQm/rOLFc64ldPahn
  5155. 65Fj65FcNG/nQ4xpQqIU84BgOKBf64xi65FcNG/nQ4xpQqLJQm/iMKpZ8G/VPaEU
  5156. R4wUR4VZ64NVPKZgSG/mNKBjQaEUNaxm65FcMLEUPK3mQaZVNqIU84BgOKBf64xi
  5157. 65FcNG1GFa3hOKlt637ZMqxmNBAUMbJoR4xi8GsUJ4VZ64ldQrEURqZgP0/VP5Bj
  5158. 64ZiMqlpN4IUP4ZiOrAUR4wUR4VdQm/kNL7nPqvJQm/kML7ZPbFn60VXP4ZXOm/j
  5159. PW/aMLFcNL9JQm/jQW/hPrFcNL9JQm/iMKpZQmYUMKtY642UP4ZiOm/oPm/oO4IU
  5160. Na3hOKlt657ZMqxmN0/jNW/oO4IUQ43mNKtoQm.cMqldMqgUPqsUR4VZ6B7EML7Z
  5161. PbFn62NVPKZgSRAUMbJoR4xi8GsUJ4VZ6B7ENKFdNr7ZNRAUQ4xk65Jk64pZPbIU
  5162. Mq3i647Z65JnNKEUR4wUQqJo65FcNG/mNKlVR4ZjPbBcOL.UMaJoRqJZPW/oO4Zn
  5163. 64ZiN4ZqOKFpMKkUMKtY65FcMLEUQqJo64xa65/VQaJiR5Ai1G.U60.U63ZjRG/X
  5164. MKsUMqldMqgUR4VZ6B7/R5FVMqUUMLAUG5JnMa3iN0VLOKNZ8G/dPW/CNLQUFa3h
  5165. OKltom/oPm/XQaJVR4IUMG/iNLQUFY3BGIlN657ZMqxmN5AURqZoO0/oO4Zn64Zi
  5166. N4ZqOKFpMKkUMKlmNK3YSG/ZPbFZQaJY643n642UG5JnMa3iN0/jQW/LOKNZ64Zi
  5167. 65FcMLEUNa3hOKlt9W/7NW/oO4IUQ4JmQqxi64Zn64tjR0/gOKtfNKEUR4wUMKtt
  5168. 65/VQaJiR5Ag65ZjRG/XMKsUMqldMqgUR4VZ6B7/R5FVMqUUMLAUEqVdP4EUOKsU
  5169. HaJr62NVPKZgSRAUR4wUMr7ZMLFZ642UPaJr62N/HIZAKG/mNKBjQaEUNaxm64Vd
  5170. Qm/jQW/cNL6UQ43mNKtoQmsUJqVZPW/oO4IUNa3hOKlt657ZMqxmN0/dQm/XQaJV
  5171. R4JY90/oO4Zn64ZiN4ZqOKFpMKkURqZgP0/VP57ZMKFt647Z643oR43XO4JY643n
  5172. 642UMqVdP4Ei1G.U60.U63FcNG/iNLVo65BZMrFdPqsURqZgP0/WNG/V64ldQrEU
  5173. 84Za643iSGYUPqMUMKlg64JqNKtoQm/VMaxpR0/oO4Zn64ZiN4ZqOKFpMKki63Fc
  5174. NG/ZRaJiR5AURqZgP0/WNG/gOLBoNKEUOKsUMG/oMK7gNG/rOLFc64xiNG/ZRaJi
  5175. R0/kNL6UP4ZiNGsUFK3XO0/oMK7gNG/gOKtZ65RdP4kUP4ZnR0/oO4IUPa3hNG/j
  5176. NW/oO4IUNLNZPbEg643i6B7jMqBpQb7ZNBAUMqVZMqgUMaxs90/VPaEUR4VZ64Jq
  5177. NKto64FVR4Ii63ZjRG/XMKsUNKFdR0/oO4IUN43oNGsUJ4VZ64BcNKBf647jS0/d
  5178. Qm/pQqJY64Zi64ZiN4ZXMLFZ65FcMLEUR4VZ64JqNKto64VVQm/jMqBpQb7ZN0sU
  5179. KKxp64xiP5YUPaJZN0/oPm/XO4JXOm/oO4Zn647jS0/dNW/tPrIURq3iR0/oPm/Y
  5180. PqBpPKJiR0/oO4IUNLNZPbEUO43kQ4JiNKEg647pR0/tPrIUML7Z64tjR0/ZPbFZ
  5181. QaZiNm/VPbYUPrFcNL6UOKtaPr7hMLFdPqsUMK7jRLEUR4VZ64JqNKto9W//64Bc
  5182. NKBf64VZQaIURqZgP0/kQaJqNKto62R3F4ZoEoxB60VVPaEUOLFcNL6UFoJ2EoxB
  5183. 65/mPqRmMKpn8G/aQaxh64ZbPaxmOKtb60VVPaEUN4JgNLFdPaQd64JhQ5Ft64Jq
  5184. NKtoQmsUEKNoNL6UNK3XO0/gOKtZ64Zn642UoYFjRqvH643mQaxr9W/NPrIUMq3i
  5185. 64BgOKBf65FcOLAUML7mPrQUR4wUNKtoNL6UPKxmNG/YNLFVOKln643WPrJo65Fc
  5186. NG/ZRaJiR0/nRKBc643n65/gMKBZ90/oSL/Z90/XMLJnNGkUPaxoNLAg65BjRL7X
  5187. NG/XOLFVR4ZjPbAg64xm64ppP5FdPKJYOK2UP4ZiOrAi63FcNG.WF4xrPW6UML7m
  5188. PrQURqZgP0/WNG/aOKlgNKEUOKsUNr7ZNKsUOKMUPKxmNG/dPaNjQapVR4ZjPW/c
  5189. MLAUMaJZPW/ZPbFZQaJY643WPrJo65FcNG/ZRaJiR1gUOLEURqZgP0/WNG/ZPL/o
  5190. SG/dNW/iPm/ZS5FmMG/YMLFV64Zn643qMKZgMK7gNGsB60.U60/4PqlgPrRdPaQU
  5191. R4VZ64JqNKto65FVMalZ65RdP4kUMaIUR5Rj647pR5FjPbAUR4VVR0/XMKsUMaIU
  5192. RLBZN0/oPm/VR5FVMqUUPaJr64JqNKtoQm/jQW/VR5FmOK7pR4Jn64xm65Fj64FZ
  5193. R43XO0/VPbYUMrJmQaJiR0/ZRaJiR5AUPr6UMLFoQaZWRLFZQmsB60.U60/IO4IU
  5194. PaJsR0/nNKBoOKxi65RdP4kUP4ZnR0/VP4kUN4xXRKpZPbEUMLFoQaZWRLFZQm/V
  5195. MaxpR0/oO4Zn64ZiN4ZqOKFpMKkU84Za643iSG/VQaIUOKsUR4VdQm/mNKBjQaEd
  5196. 9W/IO4IUMLFoQaZWRLFZQm/rOKlg647Z64ldQrFZN0/dPW/V65FVMalZ9W/3MKBc
  5197. 64ldPaIURqZgP0/bOLNZ65FcNG/iMKpZ64xa65FcNG/VR5FmOK7pR4IUMKtY642U
  5198. N4JnMr7dQ5FdPqsUPqMUMK7jRLEUR4VVR0/VR5FmOK7pR4IUNaxm65FcOLAUOKtY
  5199. OLNdN5JVP0sUEKNoNL6UNK3XO0/VR5FmOK7pR4IURqZgP0/WNG/V6B72PrRiom/V
  5200. Qb7jRm/oO43o64NpPaBoOKxiQm/gOKhZ65FcNG/hPr7Z9KZiNaxmPK3oOKxi643m
  5201. QaxrQm/dPW/oO4IUNLNZPbEUR43WP4IUN4JnMr7dMaJY643WPrNZ9UoU60.U60/0
  5202. NKljRm/oO4IUMLFoQaZWRLFZQm/oO4JmNG/hMLYUMaIUPrFcNL6UNqJiNK3gPqRd
  5203. Mq3g64ZiNaxmPK3oOKxi65BpMqUUMLAUPaxoNLAg65BjRL7XNLAg64ldPahn65Fj
  5204. 64ppP5FdPKJYOK2UNaZgNLAg64ldPahn65Fj64ZiR4JmPaJo65RZMW/nOLFZQm/j
  5205. QW/ZPK3dP0/XPqtoMKBoQmkUMKldMLBZQmkUMKtY64ldPahn65Fj643nQqxXOK3o
  5206. NKEUOKtYOLNdN5JVP5Ai1G.U60.U62JVMqUUQqJo64xa64tjR4Jn64Zn64ZiN4ZX
  5207. MLFZN0/WSG/oO4IUNaZmQrEUP4ZiNG/jNW/oO4IUPaxoNLAi62BgOKBf64xi65Fc
  5208. NG/oNLVo65Fj65NdNLQUMKtY64JYOLEUR4VZ64NpP4kUPaxoNLAUOKsUMG/nNL/V
  5209. Qa3oNG/rOKtYPrQi62JVMqUUQqxpQaBZ64BdR43oOKxi65RdP4kUO43qNG/V6B72
  5210. NLFVOKlnom/WRLFoPqsg65Fj64xkNKsUMG/rOKtYPrQURqZoO0/YNLFVOKlZN0/d
  5211. PaNjQapVR4ZjPW/VMaxpR0/oO43o64BdR43oOKxi9W/IO4IUoYFZR43dP5DH647p
  5212. R5FjPW/rOKlg647Z64NjP4ljRqJY647t65FcNG/iMKpZ64xa65FcNG/nPrJmMqIg
  5213. 65RcOKBc64ldPahn65Fj65FcNG/HHpJGEoIUQaJXPr7Y9W/BRKloOKpZN4ZV64ld
  5214. Pahn65RdP4kUQqVjRm/oO4IUPa3hNG/VQrBjMqZVR4JY65RdR4UUR4VZ64ppP5Fd
  5215. PKJYOK2UNaZgNGsUKKxp64BVPW/XP4ZXOm/oO4IUPa3hNG/oPm/nNKIUPLJgR4Zh
  5216. NKFdMG/dPK3bNLAUPr6UR4wUPr/ZPW/V65RdPaFjRm/rO4JmNG/tPrIUMq3i64Bg
  5217. OKBf643i64ZhMKRZ65FcMLEURqZgP0/jQ4Ji65FcNG/hRKloOKpZN4ZV64NdP4IU
  5218. OKsUMG/cNKlkNL6UML/kP4ZXMLFdPqsi62ZiR4JmPaJo64ldPahn65RdP4kUMaIU
  5219. PK3mOqJY65RdR4UUMG1GRqxmP4HH64ZXPqsi63ZjRG/XMKsUMqldMqgUR4VZ65Fd
  5220. R4lZ64xa65FcNG/gOKtf65Fj65NdNLQUR4VVR0/rNK6UQqZoNG/dPW/tPrJm64FZ
  5221. Na3pP5EUOKtoNL7iNLEUML/kP4ZXMLFdPqsi63ZjRG/XMKsUMqldMqgUR4VZ6B72
  5222. NLFVOKlnom/WRLFoPqsUR4wUNKFdR0/oO4IUOKtoNL7iNLEUP4ZiOmsUEKldMLBZ
  5223. Qm/rOKlg64VVRaIUMG/gOKtf65Fj643iPrFcNL6UGIt2GJN7F3J/H0/mNKBjQaEU
  5224. N4JnMr7dMaZiNm/VPW/VP4ZVQm/aPr6UR4VdQm/dPaFdRaZYRK3g9W//QrBjMqZV
  5225. R4ZjPW/gOKtfQm/rOLFc64VVRaIUMG/gOKtf65Fj643i643nQqxXOK3oNKEUGIt2
  5226. GJN7F3J/H0/mNKBjQaEi63FcNL7Z65RdP4kUMKlnPm/WNG/V64NdNKlY65RcNL7Z
  5227. 65ZjRG/XMKsUNKtoNL6UMG/YNLBXQaZkR4ZjPW/jNW/oO4IUQaJgMLFdPqtnO4Zk
  5228. 647ZR5RZNKsUR4VZ65FrPm/dPaFdRaZYRK3gQmsU1G.U60.U63FcNG//R5FVMqUU
  5229. QqJXR4ZjPW/cMLAUMG/nNL7dNLAUPqMUMbJoR4xiQm/rO4ZXO0/XMKsUMaIURLBZ
  5230. N0/oPm/VR5FVMqUURa3mOKxpQm/oSL/ZQm/jNW/YMLFV65Fj65FcOLAUGIt2GJN7
  5231. F3J/H0/mNKBjQaEi63FcNG/aRKtXR4ZjPbAUPqMUR4VZ647pR5FjPbAUOKsUR4Vd
  5232. Qm/nNKBoOKxi643mNHcB1G.U60/CPrFZQm/7Mqxi60VV64BgOL/WPq3mN0Yu643Y
  5233. N0/V64tZRm/iPrFZ657ZMqxmN0/oPm/oO4Zn657ZMqxmN0.cSKxp1G.U60.U60.U
  5234. 60.U60.UMq3i64VVRaIUMKtt64tpPK7ZQW/jNW/iPrFZ657ZMqxmN5Ag647pR0/Z
  5235. MKBc64tjR0/mNKBjQaEUOLAB60.U60.U60.U60.U60/gOKpdR4JY65Fj61Am64hW
  5236. SLFZQmYB60.U63BjRL7XNG/7Mqxi60VV647jPqgdCW/VR5FVMqUUMG/iNLQUQqxp
  5237. QaBZ64BdR43oOKxi65Fj65FcOLAUQaJXPr7Y1G.U60/BNKFdMG/jQW/AOKtf62ZX
  5238. PqsU842UNaZgPG/nR57dQ0Yu643YN0/V64ldPagUR4wUMKtt65FtQ4IUPqMU1G.U
  5239. 60.U60.U60.U60.UPLJgR4ZhNKFdMG/aOKlZ60VjQW/VMrFpMKlgSG/oPm/VPbYU
  5240. R5ZkNG/jNW/XPqpkRLFZQW/aOKlZ8G/jQW.B60.U60.U60.U60.U60/VN4EUMG/g
  5241. OKtf65Fj643i64ZiR4JmPaJo65RZMW/nOLFZ64xm64JhMKZg64BjPbFVMrEi1G.U
  5242. 60//P4ZVQncUMKFY64ldPagUR4wUMKsUMKldMLAUNaxm65FcOLAUOKtYOLNdN5JV
  5243. P.oU60.UELBnPqBdMLFdPqsu643YN0/gOKtf65Fj643iPrFcNL6UOKtYOLNdN5JV
  5244. P0/oO43o64VVQm/VPUoU60.U60.U60.U60.U643nQqxXOK3oOKxi65RdR4UUR4Vd
  5245. Qm/dPaFdRaZYRK3g1EoU60.U60/IO4IUH4ZiOrAUQqJXR4ZjPW/V65BZQaZZQm/j
  5246. NW/WRLFoPqtn65RcOKBc64BVPW/WNG/pQqJY65Fj65NdNLQUPr6UP4ZiOm/oPm/H
  5247. JI7BGJFIFJ6UQaJXPr7YQmsUJ4VZ64NpPaBoOKxiQm/jNW/oO4IUMbJoR4xiQm/d
  5248. PW/oO4Zn65BZMrFdPqsUML7ZCUoB60.U63BpMapdR5FZQXcUQqVjRm/oO4IUQrJW
  5249. PKZoR4Jm90/jQW/XQaJVR4IUMG/gOKtf65Fj642UQrJWPKZoR4Jm1G.U60//PaBZ
  5250. QrFjQW/7PbFZQaJnR1cUQqVjRm/jQW/gOKtf65Fj642UQ4JmQqxi65RdR4UUOKto
  5251. NL7ZQrEB60.U60.U60.U60.U60/dPW/oO4IUMKtXNLBoPr7n64xa65FcOLAUOKtY
  5252. OLNdN5JVP.oU60.UF4JnMqJiN43iR0/7PbFZQaJnR1cUQqVjRm/jQW/gOKtf65Fj
  5253. 642UQ4JmQqxi65RdR4UUOKtoNL7ZQrEB60.U60.U60.U60.U60/dPW/oO4IUN4Jn
  5254. MqJiN43iR5AUPqMUR4VdQm/dPaFdRaZYRK3g1EoU60.U60/4OKtVP4lt90/VPbYU
  5255. PrFcNL6UFoJ2EoxB64ZiNaxmPK3oOKxi64Zi65FcNG/mNKBjQaEURqZgP0/VQ5/Z
  5256. ML6UPaJsR0/dPW/oO4IUHrFcNL6UQqJXR4ZjPWsUIqxhNG1GPrFcNL9H64ZiNaxm
  5257. PK3oOKxi64pVSG/WNG/oO4IUN43oNG/VPaEUR4ZhNG/oO4Zn657ZMqxmN0/rMLAU
  5258. P43nR4JY64BcMKtbNKEU84Za65FcMLEUOKtaPr7hMLFdPqsUOLAUOKsUR4VZ657Z
  5259. MqxmN0Yi1EqZ62N/HIZAKG/GNKBjQaFn1G.U60.U63FcNG/dMqxi647VQW/jNW/Z
  5260. MKBc62N/HIZAKG/GNKBjQaEUNqZqNLAUMG/nNL7dNLAUPqMUMbJoR4xiQm/oO43o
  5261. 65/mPrNdN4IUQqVjQbEUMrJoQm/oPm/hMKtt64pZPbIUMqxhPK3iN0sUJ4wUP4JV
  5262. QasURqVVR0/VPbYUOKBjPW/YPqJn90/hPrNZ65FcNG/hPrJnNG/jRaJm65FcNG/W
  5263. RLFoPqsv65BjPKIUO4JgQ0/oNLVo65RdP4kUML/kNK3m64Zi65FcNG/gPrRZQWpg
  5264. NKNo64BjQatZQW/jNW/oO4IURqZiN4xr9W/7NW/WRLFoPqtn643mNG/YOKphNKEg
  5265. 64Zo64pZMKtn65FcNG/XPr7mNLBkPqtYOKtb64pZPbIUOLFZPG/dQm/XRL7mNKto
  5266. P5YUN4ZnMK7gNKEi1G.U60.U63FcNG/bQaJZPW/VQb7jRm/WRLFoPqtn65FcMLEU
  5267. NaxgP4xr643mNG/oPm1GFqwUEa3XOxAUR4wUR4VZ65/mNLNdPrJnP5YURaZZRqJY
  5268. 657ZMqxmN0/jQW/oPm/nMr7jP4kUR4wUR4VZ6B7EQaJqOKxpQxAUPr6UoYtZS5HH
  5269. 62N/HIZAKG/mNKBjQaEUOKsUR4VZ64NdP4Ii63FcNG1GG4xhNRAUMbJoR4xi64Rj
  5270. NLAUR4wUR4VZ64BpQb7ZPbEUO4xhNG/mNKBjQaEi1G.U60.U63FcNG/mNLBo64xa
  5271. 65FcNG/cNK3YNL6UQqJXR4ZjPW/gOLBoQm/oO4IUO5JnMa3iN0/VPaEURqZaNG/a
  5272. Pr6UR4VdQm/aMKpdP5Yi63ZjRG/XMKsUMqldMqgUNKZoO4Jm64tVPKIUR4wUQqJZ
  5273. 65FcNG/7HYF7JYZ2JI3A657ZMqxmN0/aPr6UR4VVR0/kNL7nPqsi62Za65FcNG/k
  5274. ML7ZPbFn64xa64JdR4VZQW/nQ4xpQqIUML7Z64hiPrRi90/oO4JmNG/rOKlg643g
  5275. QqwUMaIUMG1GI43mNKtoQxAUMbJoR4xi9W/1P4ZXOm/oO4Zn647pR5FjPW/oPm/n
  5276. NKIUR4VZ62N/HIZAKG/mNKBjQaEUPqMUR4VVR0/kNL7nPqvJQm/kML7ZPbFn9UoU
  5277. 60.U63FcNG/iNLVo65BZMrFdPqsUOLAURLBZN0/oPm/ZPbFZQW/dPaNjQapVR4Zj
  5278. PW/VMaxpR0/oO4IUN43oNG/VPaEUQ4lVMqIUNaxm65FcNG/hML7mOK3bNG/ZRaJi
  5279. R0sUEqldMqhdPaQUR4VZ6B72PrRiom/VQb7jRm/VNbFZQW/oO4IUN43oNG/rOKlg
  5280. 64xkNKsUMG/rOKtYPrQURqVZQaIUSKxp64BVPW/ZPbFZQW/hPr7Z64ZiNaxmPK3o
  5281. OKxi643WPrJo65FcNG/hML7mOK3bNG/ZRaJiR0/dPaBgRKFdPaQUPaxoNLAUMKtY
  5282. 64BdR4ZiNm/jNW/nPrJmMqJn9W/IO4IU6YFjRqsW643mQaxr65RdP4kUMaIUNaZg
  5283. P4JY64Zi64RmNKJi64Za64pjQaIUOKtaPr7hMLFdPqsUO43n647ZNKsUNKtoNL7Z
  5284. N0/VMaxpR0/oO4IUPK3mQaZVNqIv64Zo65RdP4kUMaIUNKpkR5YUOKMUPawUNLVo
  5285. Qa2UN43oMG/dQm/VRa3dP43WP4Ii1G.U60.U63FcNG/iNLVo65BZMrFdPqsUP4Zn
  5286. R5AUMKlg64BcOKlYQaJi64Zi65FcOLAUNa3hOKlt9W/4Pr6UNK3XO0/XO4ZgN0/o
  5287. O4IUR43WP4IURqZgP0/cMLNZ65FcNG/iMKpZ90/oO4JdQW/nNLUg643iN0/oO4Jd
  5288. QW/WOL7oO0/YMLFZ9W/NPrIUMq3i64BgOKBf65FcNG/iMKpZ65Fj65BZNG/oO43o
  5289. 64BcOKlYpLAUGIt2GJN7F3J/H0/mNKBjQaEi62Za65FcMLEUMqVdP4EUOLAUR4VZ
  5290. 65BkPrJnNG/dPW/VPbYUNa3hOKlt90/oO4JmNG/rOKlg647Z642UoYNVPKZgSRAU
  5291. P4ZiOm/dPW/oO4IUoYldPajH64BjP5JhPW/rO4ZXO0/tPrIUMqldMqgUR5Fj65Nd
  5292. NLQUR4VVR0/4EIp7H3YUIaJXPr7Y9W/7NW/oO43o64BcOKlY64VVN0/hPr7Z65Fc
  5293. MKsUPqtZ65BkPrJnNGkUR4VZ64ldPahZN0/aMKpdP5YURqZgP0/WNG/oO4IUPqtZ
  5294. 64NjQW/oO4IUQ57ZNaJmQaJY65BkPrJnNG.cQqJZ63BZR5FdPaQUR4VZ63/mNKNZ
  5295. Qb7ZN0/HQ4xpQqIUR4wUMqVVPaRZ65FcNG/kQaJaNL7mNKEUQr/jRLBZ8GsUJ4wU
  5296. RaZZRm/jR4VZQW/aMKpdP4ZZQm/aPr6UR4VVR0/XO4ZgN0kUMqldMqgUR4VZOL6U
  5297. Pa3hNG/VPaEUR4VZPW/XO4xjQqIUR4VZ63BkPrJnNG/XPqphMKtY64Zi65FcNG/K
  5298. OKJr64pZPbIi1G.U60.UEKNoNL6UR4VZ64NVPKZgSG/oMK7gNG/VQaIUR5Rj647p
  5299. R5FjPbAUR4VVR0/XMKsUMaIURLBZN0/oPm/VR5FVMqUUPaJr64BcOKlYQaJi64xm
  5300. 64FZR43XO0/oO4IUMrJmQaJiR0/XO4ZgN57ZPWsUJ4VZ62FZR43XO0/WRLFoPqsU
  5301. RqZgP0/WNG/YOKphNKEUOKMUR4VZQaIUML7Z64tj64BcOKlYQaJi64Zi65FcNG/X
  5302. RL7mNKto62N/HIZAKG/mNKBjQaEi1G.U60.U63FcNG/iNLVo65BZMrFdPqsURqZg
  5303. P0/WNG/V64ldQrEU84Za643iSGYUPqMUMKlg64JqNKtoQm/VMaxpR0/oO4Zn64NV
  5304. PKZgSGsUJ4VZ64JqNKtoQm/rOKlg647Z64ldQrFZN0/dPW/V65FVMalZ65RdR4UU
  5305. PqtZ64JqNKto65/ZQW/gOKtZ9W/3MKBc65FVMalZ64ldPaIURqZgP0/gOLBo65Fc
  5306. NG/iMKpZ64xa65FcNG/ZRaJiR0kUMKsUoaxXMrJmQaJYom/XO4JXOm/WPrUg643i
  5307. N0/oO4IUNLNZPbEUN43oNGsUKKxp64BVPW/ZN4Zo65FcNG/YMLFZ9W/IO4IUMqVZ
  5308. MqgUMaxs64Zn65JnNKEUOKsUOKtYOKBVR4IUR4VVR0/oO4IUNLNZPbEUO43n64xX
  5309. MrJmQaJY9W/NPrIUPqtgSG/iNKJY65Fj64BcNKBf65FcOLAUMaxs64Za65ZjRG/r
  5310. MKto65Fj64FjMrJhNKto65FcNG/ZRaJiR0/cML/kNKtZN0kUMbJo65ZjRG/VQaIU
  5311. Paxo64JiR4JmOKtb643iSG/jR4VZQW/dPaNjQapVR4ZjPW/VMaxpR0/oO4IUNLNZ
  5312. PbEi622UMqVZMqgUO4JmNG/rOKlg65/mNLNZPbEUFoJ2OLF1HooU843iN0/jNW/5
  5313. FIF1HooUQ57jNr7VPLAd64NmPqoUOKRiPr7dPaQU843iN0/YNKlZR4ZiNmYUNKpk
  5314. R5YUNLNZPbFn9W//NbFZQW/ZMKBc64ldPaIUOLAUMG1GF4xrPhAUML7mPrQi63Zj
  5315. RG/XMKsUMqldMqgUR4VdQm/VQb7jRm/oPm/ZPbFZQW/hPr7Z64FZR43dP5AUMK7j
  5316. RLEUR4VZ64JqNKto65BpMqUUMLAUQ4lVMqIg65FtQ4Ig64BVRLBZ90/iPrFZQmkU
  5317. QqxpQaBZ64BdR43oOKxiQmkUPr6UPLJgR4ZhNKFdMG/gOKtfQmsUJ4VZ6072PrRi
  5318. 6W/VQb7jRm/rOKlg647Z64NdP4lZN0/dPW/bQaJZPW/dNW/hPr7Z64ZiNaxmPK3o
  5319. OKxi64VVQm/WNKJi64JiR4JmNKEUMK7jRLEUR4VZ64JqNKtoCm/dR0/rOKlg647Z
  5320. 64JhQ5Ft64Za64tj64JsR57V64FVR42UOLAUMLNVOKlVMalZ9UoU60.U62NjP4lj
  5321. RqZiNm/oO4IUNLNZPbEUR43WP4IURqZgP0/WNG/oRqwUMbJoR4xiQm/oO43o64BV
  5322. PW/WNG/pQqJY65Fj643oR43XO0/iNLQUNLNZPbFn64xm65Fj64FZR43XO0/VPbYU
  5323. MrJmQaJiR0/ZRaJiR5Ai1G.U60.U627ZP4xr65FcNG/ZRaJiR5AUR4VZQaIUPK3t
  5324. 647Z64xoO4Jm64RZPaJVP4xbOKBVP0/dPaNjQapVR4ZjPW/nRKBc643n64tjR4Jn
  5325. 90/nPrJmMqJn90/gOKtfQm/oPm/hRKloOKpZN4ZV64NdP4Jn90/gOKtfQm/oPm/d
  5326. PbFZQatZR0/rNK6UQqZoNLAUPr6UNKpVOKkUMqxiR43XR5Ai63FcNLBZ65BZMrFd
  5327. Pqtn643mNG/dN4JiR4ZXMKkUR4wUR4VZ64BjQb7ZQr/jPaFdPaQUQqJXR4ZjPbAU
  5328. OKsUGIt2GJN7F3J/H0/mNKBjQaFn60VZS5/ZMrEUR4VZQaIUML7Z64tj643gOK3n
  5329. NLAUPr6UMLBnPqBdMLFdPqtn8GsUIqZhOKlVQalt90/oO4IUELFoMKBc643iN0/A
  5330. OKtfQm/nNKBoOKxi64NpPaBoOKxi643n64Zi62ZCF2ZKGIFJEIkUQaJXPr7YQmsU
  5331. FaZiMKlgSGkUMKtt64xoO4Jm62R3F2BDHG/dPaNjQapVR4ZjPW/dPW/oO4IUQaJX
  5332. Pr7Y65RdP4kUML/kNK3m647ZP4xr65FcNG/WRLFoPqtn9W/IO4IUP43nR0/dPaNj
  5333. QapVR4ZjPW/rOKlg647Z65FcNG/YMLFZ643iN0/oOKpZ65FcOLAUQaJXPr7Y65RV
  5334. Qm/gMLBoNKEUMqVVPaRZN0.cOKMUR4VVR0/dPaNjQapVR4ZjPW/dQm/dPW/oO4IU
  5335. QaJXPr7Y8GsB1OIUG2J/F2JG637ZMqxmN.oU60.U60/IO4IUG4JVN4Jm637ZMqxm
  5336. N0/dQm/nOKpkP5YUN4ZnQ4lVSKJY64Zi642UQqJmOKJn64xa64JYOLFdPaQUNaZZ
  5337. P4Fn9W/NPrIUMq3i64pVOqIUMKtY64BcMKtbNLAUSKxp65RVPbEU85BZNG/6FI32
  5338. FJ6UIaJXPr7Y64NjQW/oO4IUPKJVPaZiNrAUPqMUPKxnR0/jNW/oO4IUNaZZP4Fn
  5339. 8GsUI57jMa3WP5YUR4VZ64xiP5YUR4VdPaRn65ZjRG/hOKRcR0/XO43iNqIUML7Z
  5340. 65FcNG/aOKlZ64tVPKIU83BZNG1GFaZgNRAUOKsUR4VZ65BZMqxiN0/nNKBoOKxi
  5341. 8G/VPaEUR4VZ64VZMKFZQW/iPrFZQm.cP4ZnR4JY643o65FcNG/WPrFoPqoUPqMU
  5342. R4VZ62V3EIF3IW/GNKBjQaEURqZiN4xr9UoBdG/HHpJGEoIUIaJXPr7YQkoU60.U
  5343. 60/IO4IUOKBjPW/WML6UPqMUNK3XO0/HHpJGEoIUIaJXPr7Y64RdRaJn642UQqJm
  5344. OKJn64xa647pR5FjPbAUR4VVR0/kQaxqOKFZ65BcPr7o64BpR5AUR4wUPK3iSG/h
  5345. NKtp64BjPKpVPaEi63Fj64lZML7i65RcMLEUMKtt64ZXPqsUN4xZQmkUPKxqNG/o
  5346. O4IUPKxpQqIUPrNZQW/oO4IUMbJoR4xiCm/nPqpZ64VZP5.UR4JsR0/rOKlg643k
  5347. Q4JVQW/dPW/oO4IUP4xrNL6hP4JaR0/XPr7iNL6UPqMUR4VZ65RdPaFjRmsUGKMU
  5348. MbJoR4xiQm/VQaIUN4ZhPKJY90/dR0/hNK3iQm/oO4IUMqxmQaJnQ4xiN4ZiNm/h
  5349. NKtp64ZoNKoUOLAUMrJmQaJiR4lt64FdQq3WP4JY9UoU60.U60/IO4IUNr7ZNKsU
  5350. ML7mPrQUMbJoR4xiQm/oO43o64NjP4ljRm/VQaIUR4wUoYRj627VMqjH65Fj65Fc
  5351. NG/kQaJqOKxpQqlt65NdNLRZN0/mNKBjQaEUPr6UR4wUQqBmPqlg65Fj65FcNG1G
  5352. I57ZRaZjRLDH64xm6B7CNLVoom/HHpJGEoIUQaJXPr7Y64Zi65FcNG/aOKlZ9W/I
  5353. O4IUoYVjPKLH647pR5FjPW/bPqJn65Fj65FcNG/XRL7mNKto64VjPKIUQaJXPr7Y
  5354. 9UoU60.U60/IO4IUJ4ZoP4IUNaZZP4EUMKtY65FcNG/GNKNZQaJiMqIUQqJXR4Zj
  5355. PW/VQaIURLBZN0/oPm/ZPbFZQW/YNLFVOKln643WPrJo65FcNG/nPrJmMqIUQrJX
  5356. O0/VQm/oOLFgNGkUMLJoO4xm90/VPaEUQ5JWP4ZnO4Jm9W/IO4IUoZBcPr7o63Fd
  5357. R4lZom/aOKJgN0/dQm/pQqJY65Fj64JiR4Jm643i643WMb7ZRaZVR4JY65FdR4lZ
  5358. 9W/IO4Zn65FdR4lZ65RdP4kUMaIURLBZN0.cOKMUMLNVOKlVMalZ8G/rO4Ji64Bd
  5359. R4ZiNm/oO4Zn65BjRL7XNG/dPW/VPaxoO4Jm657ZMqxmN0sB60.U60.UGKMUOLEU
  5360. OLAUOqtjRqsURqVZQaIUR4VdQm/nPrJmMqIUOLAUQrFjQaJY90/oO4IUPaJsR0/n
  5361. NKBoOKxi65RdP4kUMaIUR4VZ637ZQ4xnOLFjQbYUQqJXR4ZjPWsUJ4VdQm/nNKBo
  5362. OKxi65RdP4kUO43qNG/V64ldPagUR4wUMG/GFJ/DIoZIHp7N657ZMqxmN0/VPaEU
  5363. RqZgP0/VP5Bj64ldQrEUOKtaPr7hMLFdPqsUMK7jRLEUR4VZ65BjRL7XNG/nRKBc
  5364. 643n64BVP4kUPbJhMaJm643iN0/oSL/Z64xa65BjRL7XNG.cHKJYOK2UJ5ZkNGYi
  5365. 63ZjRG/XMKsUMKlnPm/ZPbFZQW/iPrFZQm/VMaxpR0/oO4IUQrFjQa3bNG/jNW/o
  5366. O4IUQqxpQaBZ9UoU60.U60/IO4IUJ4JsR0/nNKBoOKxi64Zn65JnNKEUR4wUNKto
  5367. NL6UR4JsR0/ZS4BZQb/oQm/aQaxh65FcNG/nPrJmMqIi62BgOKBf65FcNG/aOL7n
  5368. R0/gOKtZ64xa65FcNG/oNLVo65Fj64JYOLEUR4VVR0/oNLVo64Zi642UQqJkML7V
  5369. R4IURqZiN4xr9W/IO4IUF43oMG/nNKBoOKxi64RdRaJn64ZiNaxmPK3oOKxi643W
  5370. PrJo65RcMLEUMq3i647Z64NjRKtY64Zi65FcOLAUQqxpQaBZ643iN0/iPrFZQm/V
  5371. MaxpR0/oO4IUQqxpQaBZ64FVR42i1G.U60.U63FcNG/aPqlgPrRdPaQUQqJXR4Zj
  5372. PbAUPqMUIoxJIYB3657ZMqxmN5AURqZgP0/gOLBo64tjR4Jn643WPrJo65FcNG/n
  5373. PrJmMqIg64ldPahn65Fj64ppP5FdPKJYOK2UPq7eNKBoQm/nRKBc643n65BXMKti
  5374. NKEUOKpVNqJn64NmPqoUR4VZ65BjRL7XNGkUP4ZiOrAUR4wUOKtoNL7iNLEUQqZo
  5375. NLAg643iN0/ZPK3dP0/XPqtoMKBoQm/VMaxpR0/oO4IUQqxpQaBZ9W/IO4IUELFo
  5376. MKBc65BZMrFdPqsUMq3i647Z65JnNKEUR4wUMKFY64tjR4Jn90/hRKloOKpZN4ZV
  5377. 64ldPahn90/VPaEUR4wUMr7ZMLFZ642UP4ZiOm/oPm/V6373I2xHGJFDIZYUQaJX
  5378. Pr7Y9W/IO4Zn647pR5FjPW/oPm/gOKtf65Fj642UIYJEHpB7J2xGKG/mNKBjQaEU
  5379. RqZgP0/iPrEUML/kNK3m64Za65FcOLAUIoxJIYB3657ZMqxmN0/dQm/VP57ZMKFt
  5380. 64ldPahZN0/oPm/V6373I2xHGJFDIZYUQaJXPr7Y9UoU60.U60/IO4IUHrFcNL6U
  5381. QqJXR4ZjPW/rOKlg64ZiMqlpN4IUMKtt657ZPK3dPaZiNm/dPaNjQapVR4ZjPW/n
  5382. RKBc643n65FcNG/oOKpZ65FcOLAUQaJXPr7Y65RVQm/gMLBoNKEUMqVVPaRZN0.c
  5383. OKMUR4VVR0/dPaNjQapVR4ZjPW/dQm/dPW/oO4IUQaJXPr7Y8GsB1OIUIYJEHpB7
  5384. J2xGKG/GNKBjQaFn1G.U60.U63FcNG/dMqxi647VQW/jNW/ZMKBc6373I2xHGJFD
  5385. IZYUIaJXPr7Y64RdRaJn642UQqJmOKJn64xa647pR5FjPbAUR4VVR0/kQaxqOKFZ
  5386. 65BcPr7o64BpR5AUR4wUPK3iSG/hNKtp64BjPKpVPaEi63Fj64lZML7i65RcMLEU
  5387. MKtt64ZXPqsUN4xZQmkUPKxqNG/oO4IUPKxpQqIUPrNZQW/oO4IUMbJoR4xiCm/n
  5388. PqpZ64VZP5.UR4JsR0/rOKlg643kQ4JVQW/dPW/oO4IUP4xrNL6hP4JaR0/XPr7i
  5389. NL6UPqMUR4VZ65RdPaFjRmsUGKMUMbJoR4xiQm/VQaIUN4ZhPKJY90/dR0/hNK3i
  5390. Qm/oO4IUMqxmQaJnQ4xiN4ZiNm/hNKtp64ZoNKoUOLAUMrJmQaJiR4lt64FdQq3W
  5391. P4JY9UoU60.U60/IO4IUNr7ZNKsUML7mPrQUMbJoR4xiQm/oO43o64NjP4ljRm/V
  5392. QaIUR4wUoYRj627VMqjH65Fj65FcNG/kQaJqOKxpQqlt65NdNLRZN0/mNKBjQaEU
  5393. Pr6UR4wUQqBmPqlg65Fj65FcNG1GI57ZRaZjRLDH64xm6B7CNLVoom/GFJ/DIoZI
  5394. Hp7N657ZMqxmN0/dPW/oO4IUNaZgNGsUJ4VZ6B76PqpZom/WRLFoPqsUNqxZQm/o
  5395. Pm/oO4IUMrJmQaJiR0/cPqpZ657ZMqxmN0sB60.U60.UJ4VZQaIUML7Z64NdNKlY
  5396. Qm/oPm/ZPbFZQW/oO4IUPa3hNG/VPaEUMKFYQaJnQm/jNW/oO4IUQaJkPrBdR4xm
  5397. SG/jQW/jNW/nPqpZ64ljMq3oOKxi65RcNL7Z65BjRL7XNLAUML7Z65BoPr7ZN0sU
  5398. KKxp64BVPW/VP5Bj64JiR4Jm64tjR4Jn643WPrJo65FcNG/mNL/jQqZoPr7t9W/I
  5399. O4IUN43oNG/VPaEUR4ZhNG/oO4Zn657ZMqxmN0/rMLAUP43nR4JY64BcMKtbNKEU
  5400. 84Za65FcMLEUOKtaPr7hMLFdPqsUOLAUOKsUR4VZ657ZMqxmN0YURqZgP0/WNG/Y
  5401. OLBkP43tNKEUMLEUR4VZ64JiN0sB1OIUIpJ0HIZIJ2JG637ZMqxmN5AB60.U60.U
  5402. J4VZ64ZXPqsUMa3m64xa64JVMqUUIpJ0HIZIJ2JG637ZMqxmN0/bOLNZQm/V65BZ
  5403. QaZZQm/jNW/WRLFoPqtn65FcMLEUQ57jRaZYNG/nO4xmR0/XRLFn65Fj64pVPbYU
  5404. PKJiRG/XPqphMKtY9W/IPm/gNK3mPW/rO43o643iSG/dMqxi64FjNLAg64pjRaIU
  5405. R4VZ64pjRLBZ64xqNL6UR4VZ647pR5FjPXgUQqxhNG/cNKlk65FZS5EURqZgP0/V
  5406. Q5/ZML6UOKsUR4VZ64ljRqJm9KlZNbEUMqxmPaJm64xa65FcNG/rOKtYPrQi62Za
  5407. 647pR5FjPbAUML7Z64FdPKpZN0kUOLEUPKJVPbAUR4VZ64BjQb7ZQr/jPaFdPaQU
  5408. PKJiRG/dR4Jh64Zn64BpQb7ZPbFgSG/YOLBVMalZN0sB60.U60.UJ4VZ64RmNKJi
  5409. 643mQaxr647pR5FjPbAUR4VVR0/aPqlgPrQUML7Z65Fj6B75Pm/0MKBfom/oPm/o
  5410. O4IUQ57ZRaZjRLBgSG/qOKJrNKEUQaJXPr7Y64xm65Fj65BXQaxgP0/oPm/oO4IU
  5411. oZ/mNLNdPrJnom/jQW1GHaJsRBAUIpJ0HIZIJ2JG657ZMqxmN0/dPW/oO4IUNaZg
  5412. NGsUJ4VZ6B76PqpZom/WRLFoPqsUNqxZQm/oPm/oO4IUMrJmQaJiR0/cPqpZ657Z
  5413. MqxmN0sB60.U60.UJ4VZQaIUML7Z64NdNKlYQm/oPm/ZPbFZQW/oO4IUPa3hNG/V
  5414. PaEUMKFYQaJnQm/jNW/VPbZjPaIUMKBoOKtb643n642UQrJWPKZoR4Jm64NjQW/o
  5415. O4IUNqJiNK3gPqRdMq3g64FVR42UOKsUR4VZ64BpQb7ZPbEUFoJ2EoxB62NdP4Ii
  5416. 63FcNL7Z64Zn643gQqwUMG/WRLFoPqsUR4wUMKFY64ppP5FdPKJYOK2UP4ZiOrAU
  5417. 85BpMqUUMLAUMG/kOKBoRL7Z64xa65FcNG/nRK7hOLFoNL6d64xm65Fj643YN0/d
  5418. PbFZQatZR0/jQW/ZPK3dP0/XPqtoMKBoQm/VMaxpR0/oO4IUQrJWPKZoR4Jm60Vn
  5419. RKBc643n642UO4xhNG/kMKRZ64xm643i64JhMKZg643YN57ZQrAd9W/IO4IUN43o
  5420. NG/VPaEUR4ZhNG/oO4Zn657ZMqxmN0/rMLAUP43nR0/XO43iNqJY60VdNW/oO43o
  5421. 64ZiNaxmPK3oOKxi64Zn64Zi65FcNG/mNKBjQaEd65RdP4kUMaIUN4ZnQ4lVSKJY
  5422. 643iN0/oO4IUNKtY9UoBdG/HJI7BGJBHGIxC637ZMqxmN5AB60.U60.UJ4VZ63BJ
  5423. EYp7IpB7HosUIaJXPr7Y64Zn65BdPL/gSG/YOLBkP43tNKEUMKtY65ZjRG/XMKsU
  5424. MqVVPaRZ643iSG/aOKJgN0.cQqJZ63BJEYp7IpB7HosUIaJXPr7Y64NjQW/oO4IU
  5425. PKJVPaZiNrAUPqMUR4VZ64NdNKlYQm/dPW/oO4Zn65FtQ4IUPqMUQaJXPr7Y8GsB
  5426. 1OIUHJJAJ2ZBFIF7EG/GNKBjQaFn1G.U60.U62pJH3F7HIJ2GI2UIaJXPr7YQm/d
  5427. PW/5FIF1HooUFaZgNLAUML7Z65JnNKEUR4wUQrFjQaIUNKtXPqFZN0/hRKloOKpZ
  5428. N4ZV64FVR42i62ldOqIUMKlg64xoO4Jm64RZPaJVP4xbOKBVP0/VQ5/gOKBVR4Zj
  5429. PbAg62R3F4ZoEoxB64FjNLAUPaxo65BpQ5/jQbEUFKtXPqFZN0/BJIlIGIp3F2Z/
  5430. 637ZMqxmN5Ai62Za65ZjRG/jQ4Ji65BpMqUUMG/mNKBjQaEg65ZjRG/rOKlg65BZ
  5431. NG/V64tjR4ZXNG/VMaxpR0/oO4IUNKtXPqFZN0/mNKBjQaEUMKtY65BjPKIUOKta
  5432. Pr7hMLFdPqsUMK7jRLEURqVVR0/YMLFV64Zn64JiMqxYNKEUOKsUR4VVR0/mNKBj
  5433. QaEi63ZjRG/XMKsUMqldMqgUPqsUR4VZ6B7KOKJr62JiMqxYNKEUF43oMRAUMbJo
  5434. R4xi65Fj65BZNG.cMKtY64BjQ5Yg64Za64FZQqZmNKEd65FcNG/mMLQUNKtXPqFZ
  5435. N0/YMLFV9W/NPrIUQqVjRKlY643YN0/hRKloOKpZN4ZV65Fj65ZjRG/bNKtZMKlj
  5436. NqZXMKkUN43oMG/WSG/VN4FdPaQUP4ZiOrAUR4wUPLJgR4ZhNKFdMG/aOKlZQm.c
  5437. QqJZ62ldPahdPaQUR4wUHLJgR4ZhNKFdMG/4OKlZQmYi1EpEQaZiR4JY637ZQ4xm
  5438. R5AUOKsUR4VZ62FZNa3pP5EUFoJ2OLF1HooUFaxmPK3o1G.U60.U63/mOKtoNKEU
  5439. QaJkPr7oQm/rO4Ji65JnOKtb65FcNG/2NKNVRKlo62R3F4ZoEoxB62NjQapVR0/r
  5440. OKlg64BjPbFVOKsUMKlg65FcNG/5FIF1HooUOKtaPr7hMLFdPqsUOKsUR4VZ64Nd
  5441. P4Ii63FcNLYURqZgP0/YOLBkP43t64Zi642UPK3iPaJm65BdPKZgML6UR4wUR4VZ
  5442. 65BXQaJZPW/YOLBkP43t64JsMqJkR0/oO4Jt65RdP4kUMaIUPKxnR4lt647gMKBf
  5443. 643iN0/rO4ZoNG/VPaEUPaxo65JnNG/VPbYUPqMUR4VZ6B7WPr7YNL9H64JgNKpZ
  5444. PbFn643mPrJiN0/aOKJgN5Ai63BjPKIUMqxgPr6UR4JsR0/rOKlg647Z65JnNKEg
  5445. 647pR0/tPrIUMq3i65FpQasUPqMUR4VZ64BjP4xm647t64BcNKBfOKtb65FcNG1G
  5446. EWNL63/mOKtoOKtbom/XO4JXOm/WPrUUOKsUR4VZ62RZPaJmMKkUI57ZNaJmNKtX
  5447. NLAi1G.U60.U62Zi65FcNG/nMr7ZNKsUN4ZnQ4lVSGkUQqxhNG/YMLFV643kQ4JV
  5448. QbAU64xiP5YUOKsUQ4xk9LJk62BcOKlY63RdPaFjRrAU84JsMKpkP4Jn64ZiMqlp
  5449. N4IUoYFZR43dP5DH647pR5FjPbAg64tjR4Jn90/VPaEUPLJgR4ZhNKFdMG/aOKlZ
  5450. 64ZhMKRZQm/VPaEUOKtaPr7hMLFdPqsd9W/7PW/kQaZiR4JY657ZQ4xmR5Ag643g
  5451. P0/oO4Zn64ZiNaxmPK3oOKxi65RdP4kUQ57dPbEUMKljPaQURqZoO0/mNKBjQaEi
  5452. 62JqNKsUOKpVNqJn64NmPqoUPLJgR4ZhNKFdMG/aOKlZQm/rOKlg65/mOKto60VV
  5453. QrBpPKZiNm/oO4IUNaZgNG/XMKsUMaIUNaxpPaEUMKtY65FcNG/dPK3bNG/XMKsU
  5454. MaIUQaJVN0.h64pjQrEUOKpVNqJn64NdP4IUNaxmPK3oQm/rOKlg65RjQagd9U
  5455. @@GeDF@@URLLink
  5456. .WM....../..2..F.jwA.Dzzzzw............E....2.........0U.66.5U./
  5457. ..c....../..2.0MU/......./..2............2U.../6.......6..2.0...
  5458. ...5NCW.........1Y2....J..1zzzzzzzw..HAnzzyNaE.0..0vik....AnAtaN
  5459. NaM./1AnNaNaNU.3AnA..7aN..PAnAnAzzw./taNaNbzzk.6NaNaNgnA..YnAnAn
  5460. NaM.0daNNaONaE.9rRrRrRrR..nAnAnAnAk.1Pivivivik.CW6W6W6W6..xrRrRr
  5461. RrQ.22F2F2F2F..F6W6W6W6W./6F2F2F2F2.3DzznAmNaE.JzzzSkgxQ.Dw.....
  5462. ........./..2.......2..E...4z/LvzzkJ1zsJ0Tzz.EA11kA2zzzy3F.43FLz
  5463. .E21.To1//.2zlIJ2EwJzkc1.k21.EA1/.w60DwJ2EwJzko2.EA/.kA21UQ60DwJ
  5464. 2EDz/Ug5zUA21kA6/kTy0.1z1kbz1.MA/kE1/.UCz.U.zl2.zzs5/kM51UA20.E2
  5465. zUU.zko.zzc5/kU2.kEF0ELz1E1zyUQ50.62.UEE0TwB.Dzv/k260Do2.jwFzkk/
  5466. 3Tzu0Ds2.l2FzlIB.FLzyUU4/TwFzl5z3Es03FLzykU40EEF2TwJ3Ezy3EbzzkI6
  5467. /EIF2jzzzVI4z/LvzzkJ..0U.6A.zk
  5468. @@GeDF@@MMIcon
  5469. .Ys....../M.4..F.jwA.Dzzzzw............M....3U........0U.66.5U./
  5470. ..c....../M.4.0MU/U....../M.4............2U.../6.......6..2.0...
  5471. ...5Jj46........7p6....7..1zzzzzzzw..OeeeeeeeU.0rRrRrRrR..DzzwnA
  5472. aNY./1AnzzyNaE.3RrRrRrRr..Pzzzzz..../wnAnAnAn..6aNbzzzzz.Dw.....
  5473. ........./M.4.......3U.M...4..Dfzk.1/k1zv../.Tw7.Tw.vU60.E5z1.9z
  5474. ..9pzzg0.U2/zlI4zk.0zk..zzo1zUM/zzzw.U6/.TwK/jw..jw..Dzx.zs4.jw5
  5475. zzo0.U2/zlI0zk.0zTzx.zs4.zw5/zzy.U6/.TwJ.jw..jrzzEDy/U1zzUQ3zk60
  5476. .E5z3EXz..9z..1z.kDx/E.4yzw1.U2/zlU5zk.0zk..zkDx/Eg./EM4zk..zk6/
  5477. .TwL.jw..jrz.kA3/E1y/E24/jrz.k6/.TwL.jw..jrz0.E3/E../EI60Drz.k6/
  5478. .TwJ/zw..jw..Dw2yUI60Dw..Dw0.E5z4EXz..9z..1z/.Hy/Eg6/EI6zk..zk6/
  5479. .TwF.jw..jrzzEHw0Drz.k6/.TwF.jw..jrzzEHw0Drz.k6/.TwJ/jw..jw..Dzx
  5480. /Dk6/zw..Dw0.E5z0k9z..9kzkA0.E5z0E5z.Cs0.U2/zkQ/zk1g.E1z/U1zuk2.
  5481. zkM..yjz..A.c.01.Dw
  5482. @@GeDF@@SourceIcon
  5483. .as....../M.4..F.jwA.Dzzzzw............M....3U........0U.66.5U./
  5484. ..c....../M.4.0MU/U....../M.4............2U.../6.......6..2.0...
  5485. ...5Jioc........7zI....6..1zzzzzzzw..OeeeeeeeU.0rRrRrRrR..A.....
  5486. aNY./3JJJJJJJE.3W6W6W6W6..PAn......./zzznAmNaE1z...............K
  5487. ./U....../M.4.../U.5uzw./kQ.zyk..E5z0E5z.Cs0.U2/zl2/zk1y.jo1z.9x
  5488. .zs0.U2/zlY3zk.0.kA3zU...zs0..Dy..M3.kA0.E5z3ELz..61..Lx.Ds1zE.4
  5489. /EE1.U2/zlYLzk.0.k.3...4...2...4...3/.A0.E5z4FTz..61..I4..M./UE.
  5490. /UM...I2.k6/.TwN/jw..UA./E1y/Uo./.../U../EE1.U2/zlY4zk.0.k.3.Ds4
  5491. 1E.2...4...3/.A0.E5z4FTz..61..I4..M./UE...M...I2.k6/.TwN1Dw..UA.
  5492. /E../U../.1y/UQ./EE1.U2/zlI3zk.0.k.3z.../Dk./UI2.k6/.TwL/Dw..UA.
  5493. zULy...2zU1y/EI2.k6/.TwM/Dw..UA3zUE4/E../.../To2/.A0.E5z3kHz..61
  5494. /Ds1..Hw/E.2zUA3/.A0.E5z3kHz..61.zs0..Dw/..1zU63.kA0.E5z1E5z.Dc0
  5495. z.Du.U6/.Tw7.Tw.vU60.E5z/k5z.Ck/.Dw4.Dzf.E1z/U.5uzw./k0U.6A.zk
  5496. @@GeDF@@DownIcon
  5497. .Mk....../..2E.F.jwA.Dzzzzw............F....2.........0U.66.5U./
  5498. ..c....../..2E0MU/6....../..2E...........2U.../6.......6..2.0...
  5499. ...5JihY........74s....5..1zzzzzzzw..OeeeeeeeU.0rRrRrRrR..DzzwnA
  5500. aNY./...6W6....3../2F.....M..5Rr....zk..............2..F.......E
  5501. ./2...Q..z9z.EBR0.1zwk.0.Tw.0U5z.DI0.k2/zk.8.Tw.xE61.E5z..c/zk1p
  5502. .UA/.Tw81kHz..60/Dc3/EE0.E5z./2/zk1y.U.2z.M4/.60.E5z./6/zk1x.U.2
  5503. zUM./Ds0.k2/zk.E.Tw.z.60/.M2zE61.E5z..s/zk1v.U.2z.61.E5z..c/zk1p
  5504. .UA/.Tw.0U5z.DI0.k2/zk.8.Tw.xE61.E5z..U/zk1n.E5z..Q.zz6/.TwU/k.1
  5505. wjw/.k...8..Uk1z
  5506. @@GeDF@@NotesIcon
  5507. .Zc....../M.4..F.jwA.Dzzzzw............M....3U........0U.66.5U./
  5508. ..c....../M.4.0MU/U....../M.4............2U.../6.......6..2.0...
  5509. ...5Jic6........7ZQ....7..1zzzzzzzw..OeeeeeeeU.0rRrRrRrR..DAn7aN
  5510. NaM./CvivivivU.3iviviviv..MW6W6W6W6./zzzzzw....6zzzAn7aN.Dw.....
  5511. ........./M.4.......3U.M...4..Xfzk.60E5z.Cs0.U2/zko/zk1t.jvzyE60
  5512. .E5z2.1zyE62zk../Dzu.U6/.TwE.Dzt.UHz/Dw.zzc0.U2/zl6.zzs0yzw0..E2
  5513. yzw2.U6/.TwN3zw0.jzz/EDz/..2...2.Dw1.zzz.U2/zlA4zk60zkI1/jU//kM3
  5514. .zw0.E5z2ELz.U9z.kLq/UM1/Tw0.E5z3ETz.U9z.kA3/jc50.M3.kLz.U2/zlYL
  5515. zk60zkI1.kM5zzw5zzw5/UA3.zw0.E5z3ETz.U9z.kI3/jc50.M3.kLz.U2/zlY6
  5516. zk60zkI1.kM5zjw9/zw5/UA3.zw0.E5z3ETz.U9z.kI1/jc50.M3.kLz.U2/zlI5
  5517. zk60zkI1/EDu/UU1.kI1zk6/.TwN3zw0.jw1/EA3.kI3.kI1/EI1.kLz.U2/zlU9
  5518. zk60zkI1/EA3.kA3zEA5/EI1zk6/.TwA.Dzy.j9z/.60.E5z0.1zvE60.E5z/k5z
  5519. .ik/.Dw4.Dzf.E1z/U.6uzw.0...c.01.Dw
  5520. @@GeDF@@EmptyDownIcon
  5521. .ME....../..2E.F.jwA.Dzzzzw............F....2.........0U.66.5U./
  5522. ..c....../..2E0MU/6....../..2E...........2U.../6.......6..2.0...
  5523. ...5Jj5Y........7PQ....4..1zzzzzzzw..OeeeeeeeU.0rRrRrRrR..DzzwnA
  5524. aNY./...6W6....3../2F....Dw............../..2E......2..F...5..Dm
  5525. zk21LUU.zzA..U5z..c/zk1p.UA/.Tw.0U5z.DI0.k2/zk.8.Tw.xE61.E5z0Uw2
  5526. zk.0.UHu/EI2.U2/zk.F.Tw.zU6./Dk./UE0.U2/zl2G.Tw.zE6./Ds...Hy.UA/
  5527. .Tw.2.5z.Dk0.UE./Do0.k2/zzwC.Tw.yk6./Dk0.k2/zzw8.Tw.xE61.E5z..c/
  5528. zk1p.UA/.Tw.0U5z.DI0.k2/zzw6.Tw.wk2/zk.5.Dzm.E5z..Q..z9z.EDz..0U
  5529. .6A.zk
  5530. @@GeDF@@PlusIcon
  5531. .Q6....../2.2E.F.jwA.Dzzzzw............F....2E........0U.66.5U./
  5532. ..c....../2.2E0MU/6....../2.2E...........2U.../6.......6..2.0...
  5533. ...5eQkQ........Qb6....5..1zzzzzzzw..OeeeeeeeU.0rRrRrRrR..DzzwnA
  5534. aNY./1AnzzzAn..3../aNU....O6W6W6W6U.zk..............2E.F.......F
  5535. ./2...Q..z9z.EB00E1zx..1.E5ztkc/zk1p.UA/.Twm1U5z.Do0zELx.UA/.TxH
  5536. 2U5z.Do0/.I...I4zU61.E5zP/6/zk1x.UE3..E3/js0.k2/zk6F.jw..jo3.E.2
  5537. zEI2.U2/zqkC.zw..ULt..I3.U2/zzEG/zw..UI./.E.zEE3/EM/.TwA2E9z..9x
  5538. /E2./Do3/.M/.TxS2Ubz..60/UM3..E3zEM1.E5zJV6/zk1x.UE3..E3/js0.k2/
  5539. zq.E.Tw.zE9x/E.4zU61.E5zSUs/zk1w.jo4zU61.E5z3.U/zk1n.E5z..Q.zz6/
  5540. .TzQ/k.1wjw/.ys..8..Uk1z
  5541. @@GeDF@@MinusIcon
  5542. .MU....../2.2E.F.jwA.Dzzzzw............F....2E........0U.66.5U./
  5543. ..c....../2.2E0MU/6....../2.2E...........2U.../6.......6..2.0...
  5544. ...5eQYw........Quc....5..1zzzzzzzw..OeeeeeeeU.0rRrRrRrR..DzzwnA
  5545. aNY./6W6W6W6W..3zzyNaQnA..Ovik......zk..............2E.F.......F
  5546. ./2...Q..z9z.ECw0E1zx..1.E5z..c/zk1p.UA/.Tw.0U5z.DI0.k2/zkk8.Tw.
  5547. xE61.E5z/Ec/zk1p.UA/.TwO1.9z..9r/UE0.E5z/Us1zk.0/jY./EM0.E5zLUw2
  5548. zk.0/U1u/EI4/.2/zqUA.jw..jQ4/.E/.Tw21.Dz..60xkE1.E5ztkc/zk1p.UA/
  5549. .Tx40U5z.DI0.k2/zkA8.Tw.xE61.E5zlUU/zk1n.E5zD.Q.zz6/.TwO/k.1wjw/
  5550. .rE.c.01.Dw
  5551. @@GeDF@@FamIcon
  5552. .a6....../M.4..F.jwA.Dzzzzw............M....3U........0U.66.5U./
  5553. ..c....../M.4.0MU/U....../M.4............2U.../6.......6..2.0...
  5554. ...4gd4A........HTg....8..1zzzzzzzw..OeeeeeeeU.0rRrRrRrR..Dzzk..
  5555. aNY./7aNNaM....3.....7aN..PivU....../sW6.......6../JJE....bzzwnA
  5556. aNY.zk..............3U.M.......K./U...M.0Sjz..Y5.Dzg..2/zko/zk1x
  5557. .U.2wk60.E5z2U5z.Ds0zUHv.U22/Dk0.U2/zl6/zk1x.U.2yU6//.Hw.U6/.Tw7
  5558. .Tw.vU60.E5z2E9z..9u0.20.jg5zU60.E5z4FTz..66.jw6zk66.UQ0.UQ5.U65
  5559. .U6/.TwN3zw..jw0zkXz.jw0zk60/UM0.UQ0.U2/zlM/zk1y.U9z0Dzw.UDz/UPz
  5560. zE60.E5z4.5z.Ds0.jw0zzo0/Tzz/UPzzzs0.U2/zlY/zk1y.ULz.jw0/.Hy.Ubz
  5561. zk62/.60.E5z4E5z.Ds0/Tw0zk62/Ds00Tzz.UE2.U6/.Tw7.Tw.vU60.E5z2.5z
  5562. .Dk0yzw/.U9vzk6/.TwJ.Tw.yk61zkI3zzo0/zw1.zw0.E5z3E5z.Dg0.zw3/Tzx
  5563. .UTz.kDz.U2/zlI/zk1v.UDz.U9zzE65zk60zk6/.TwJ.Tw.yk61zk60zzo0/zw0
  5564. .jw0.E5z/k5z.Ck/.Dw4.Dzf.E1z/U.7uzw.0E0U.6A.zk
  5565.